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IDENTIFICATION 


PRODUCT CODE: AC -7794B -MC 

PRODUCT NAME : CZDHUBO DHU-11 FUNC TST PART1 
PRODUCT DATE: 3 MARCH 1984 

MAINTAINER: ENE - DIAGNOSTICS GROUP 
AUTHOR : ANTHONY HART 

MODIFIED BY: ANTHONY HART 


THE INFORMATION IN THIS DOCUMENT IS SUBJECT TO CHANGE WITHOUT 
NOTICE a 3 SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGIiAL 
EQUIPMENT CORPORATION. fo DS at cee oa CORPORATION ASSUMES NO 
RESPONSIBILITY FOR ANY ERRORS THAT MAY APPEAR IN THIS DOCUMENT. 
OF 
S 


NO RESPONSIBILITY IS ASSUMED FOR THE USE OR RELIABILITY 
SOFTWARE ON EQUIPMENT THAT IS NOT SUPPLIED By OIGITAL OR IT 
AFFILIATED COMPANIES. 

COPYRIGHT (C) 19864 BY DIGITAL EQUIPMENT CORPORATION 
THE FOLLOWING ARE TRADEMARKS OF DIGITAL EQUIPMENT CORPORATION: 


DIGITAL POP UNIBUS MASSBUS 
DEC DECUS DECTAPE 
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eeee¢ MODIFICATION HISTORY eeeee 
ORIGINAL RELEASE: 15-DEC-83 ANTHONY HART 


VERSION BO 3-MAR -84 ANTHONY HART 
TWO NEW TESTS WERE INCLUDED IN THIS PART; 


TEST 15 - CSR BIT 4 TEST. 
TEST 25 - DIAGNOSTIC FIELD (BMP) TEST. 
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1.0 GENERAL PROGRAM CONSIDERATIONS 


1.1 PROGRAM ABSTRACT 


CZDHUBO IS PART ONE OF THE DHU FUNCTIONAL VERIFICATION TEST. 
THIS PART OF THE TEST VERIFIES THE RESET, SELFTEST, REGISTER 
ACCESS,BMP CODE, AND INTERRUPT FUNCTIONS OF THE BOARD ARE 
FUNCT IONING CORRECTLY. 


THIS DIAGNOSTIC HAS BEEN WRITTEN FOR USE WITH THE DIAGNOSTIC 
PUNTIME SERVICES SOFTWARE (SUPERVISOR). THESE SERVICES PROVIDE 
THE INTERFACE TO THE OPERATOR AND TO THE SOFTWARE ENVIRONMENT. 
TRIS PROGRAM CAN BE USED WITH XXDP+, ACT, APT, SLIDE AND PAPER 
TAPE. FOR A COMPLETE DESCRIPTION OF THE RUNTIME facet tes REFER 
TO THE XXDP+ USER‘S MANUAL. THERE IS A BRIEF DESCRIPTION OF 

THE RUNTIME — IN THE OPERATING INSTRUCTIONS - COMMANDS 

OF THIS DOCUMENT 


1.2 SYSTEM REQUIREMENTS 
THE FOLLOWING HARDWARE IS REQUIRED TO RUN THE DHU11 FVT: 


O UNIBUS PROCESSOR WITH AT LEAST 32k BYTES OF MEMORY. 
O DOHU BOARDS INSTALLED ON THE UNIBUS. 


O APPROPRIATE PROGRAM LOAD DEVICE SUPPORTING Xx0P. 
MEDIA OR A DOWN LINE LOADING SYSTEM. 


1.5 RELATED DOCUMENTS AND STANDARDS 
0 ee ot USER'S MANUAL oeeereees THE RUNNING OF DIAGNOSTICS 
R THE XXDP>+ MONIT 
1.4 OIAGNOSTIC HIERARCY PREREQUISITES 
THE PROCESSOR, THE UNIBUS, THE SYSTEM MEMORY, THE CONSOLE TERMINAL 


AND THE LOAD MEDIA ARE ASSUMED TO HAVE BEEN TESTED AND FOUND WORKING 
BEFORE THIS PROGRAM IS RUN. 
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2.0 OPERATING INSTRUCTIONS 


THIS SECTION CONTAINS A BRIEF DESCRIPTION OF THE RUNTIME SERVICES. 
FOR DETAILED INFORMATION, REFER TO THE XXDP+ USER'S MANUAL (CHQUS). 


2.1 COMMANDS 


THERE ARE ELEVEN LEGAL COMMANDS FOR THE DIAGNOSTIC RUNTIME SERVICES 
(SUPERVISOR). THIS SECTION LISTS THE COMMANDS AND GIVES A VERY 
BRIEF DESCRIPTION OF THEM. THE XXDP+ USER'S MANUAL HAS MORE DETAILS. 


COMMAND EFFECT 

START START THE DIAGNOSTIC FROM AN INITIAL STATE 

RESTART START THE DIAGNOSTIC WITHOUT INITIALIZING 

CONT INUE CONTINUE AT TEST THAT WAS INTERRUPTED (AFTER tC) 

PROCEED CONTINUE FROM AN ERROR HALT 

EXIT RETURN TO XXDP+ MONITOR (XXDP+ OPERATION ONLY!) 

ADD ACTIVATE A UNIT FOR TESTING CALL UNITS ARE 
CONSIDERED TO BE ACTIVE AT START TIME 

DROP DEACTIVATE A UNIT 

PRINT PRINT STATISTICAL INFORMATION (CIF IMPLEMENTED 

| BY THE OIAGNOSTIC - SEE PERFOMANCE AND PROGRESS 
REPORTS SECTION OF THIS DOCUMENT ) 

DISPLAY TYPE A LIST OF ALL DEVICE INFORMATION 

FLAGS TYPE THE STATE OF ALL FLAGS (SEE FLAGS SECTION) 

ZFLAGS CLEAR ALL FLAGS (SEE FLAGS SECTION) 


A COMMAND CAN BE RECOGNIZED BY THE FIRST THREE CHARACTERS. SO 
YOU MAY, FOR EXAMPLE, TYPE “STA” INSTEAD OF “START”. 

MORE INFORMATION CAN BE FOUND WITHIN THE SECTION LABELLED 
EXTENDED COMMAND SYNTAX 
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2.2 SWITCHES 


THERE ARE SEVERAL SWITCHES WHICH ARE USED TO MODIFY SUPERVISOR OPERATION. 


THESE SWITCHES ARE APPENDED TO THE LEGAL COMMANDS. ALL OF THE LEGAL 
SWITCHES ARE TABULATED BELOW WITH A BRIEF DESCRIPTION OF EACH. 
IN THE DESCRIPTIONS BELOW, A DECIMAL NUMBER IS DESIGNATED BY “DDDDD". 


SWITCH EFFECT 

/TESTS:LIST EXECUTE ONLY THOSE TESTS SPECIFIED IN 
THE LIST. LIST IS A STRING OF TEST 
NUMBERS, FOR EXAMPLE - /TESTS:1:5:7-10. 
THIS LIST WILL CAUSE TESTS 1,5,7,8.9,10 TO 
BE RUN. ALL OTHER TESTS WILL NOT BE RUN. 

/PASS :DODDD EXECUTE DDDDD PASSES (DDDDD = 1 TO 64000) 


/FLAGS:FLGS SET SPECIFIED FLAGS.SEE THE FLAGS SECTION 
OF THIS DOCUMENT. 

/EOP : DDDDD REPORT END OF PASS MESSAGE AFTER EVERY 
DDDDD PASSES ONLY. (DDDDD = 1 TO 64000) 

/UNITS:LIST TEST/ADD/DROP ONLY THOSE UNITS SPECIFIED 


IN THE LIST. LIST EXAMPLE - /UNITS:0:5:10-12 
USE UNITS 0,5,10,11,12 (UNIT NUMBERS = 0-63) 


EXAMPLE OF SWITCH USAGE: 

START/TESTS:1-5/PASS: 1000/E0P: 100 
THE EFFECT OF THIS COMMAND WILL BE: 1) TESTS 1 THROUGH 5 WILL BE 
EXECUTED, 2) ALL UNITS WILL TESTED 1000 TIMES AND 3) THE END OF 
PASS MESSAGES WILL BE PRINTED AFTER EACH 100 PASSES ONLY. A 
SWITCH CAN BE RECOGNIZED BY THE FIRST THREE CHARACTERS. YOU MAY, 
FOR EXAMPLE, TYPE “/TES:1-5” INSTEAD OF “/TES1S:1-5”. 


BELOW IS A TABLE THAT SPECIFIES WHICH SWITCHES CAN BE USED BY EACH 
COMMAND . 


TESTS PASS FLAGS EOP UNITS 
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2.3 FLAGS 


FLAGS ARE USED TO SET UP CERTAIN OPERATIONAL PARAMETERS SUCH AS 
LOOPING ON ERROR. ALL FLAGS ARE CLEARED AT STARTUP AND REMAIN 
CLEARED UNTIL EXPLICITLY SET USING THE FLAGS SWITCH. FLAGS 

ARE ALSO CLEARED AFTER A START COMMAND UNLESS SET USING THE 
FLAG SWITCH. THE ZFLAGS COMMAND MAY ALSO BE USED TO CLEAR 

ALL FLAGS. WITH THE EXCEPTION OF THE START AND ZFLAGS COMMANDS, 
NO COMMANDS AFFECT THE STATE OF THE FLAGS; THEY REMAIN SET OR 
CLEARED AS SPECIFIED BY THE LAST FLAG SWITCH. 


FLAG EFFECT 

HOE HALT ON ERROR - CONTROL IS RETURNED TO 
RUNTIME SERVICES COMMAND MODE 

LOE LOOP ON ERROR 

IER*s INHIBIT ALL ERROR REPORTS 

IBRs INHIBIT ALL ERROR REPORTS EXCEPT 


FIRST LEVEL (FIRST LEVEL CONTAINS 
ERROR TYPE, NUMBER, PC, TEST AND UNIT) 


IXR-s INHIBIT EXTENDED ERROR REPORTS (THOSE 
CALLED BY PRINTX MACRO'S) 

PRI DIRECT MESSAGES TO LINE PRINTER 

PNT PRINT TEST NUMBER AS TEST EXECUTES 

BOE “BELL” ON ERROR 

UAM UNATTENDED MODE (NO MANUAL INTERVENTION) 

ISR INHIBIT STATISTICAL REPORTS (DOES NOT 


APPLY TO DIAGNOSTICS WHICH DO NOT SUPPORT 
STATISTICAL REPORTING) 


IOR INHIBIT PROGRAM DROPPING OF UNITS 

ADR EXECUTE AUTODROP CODE 

LOT LOOP ON TEST 

EVL EXECUTE EVALUATION (ON DIAGNOSTICS WHICH 


HAVE EVALUATION SUPPORT) 
*SEE THE ERROR INFORMATION SECTION OF THIS DOCUMENT. 
SEE THE XXDP+ USER‘S MANUAL FOR MORE DETAILS ON FLAGS. YOU MAY 
SPECIFY MORE THAN ONE FLAG WITH THE FLAG SWITCH. FOR EXAMPLE, 
TO CAUSE THE PROGRAM TO LOOP ON ERROR, INHIBIT ERROR REPORTS 
AND TYPE A “BELL” ON ERROR, YOU MAY USE THE FOLLOWING STRING: 


/FLAGS:LOE: IER: BOE 
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2.4 EXTENDED COMMAND SYNTAx 
2.4.1 START COMMAND - 


SESEEEESESAESEEASSESESASASESESESESSESASEASESOAAEEERS CLHAOREKEDEERE 
STACRT )/TESTS: <TEST -LIST>/PASS: <PASS-CNT>/FLAGS: 
<FLAG-LIST>/EOP:<INCR> 


BESESEEESEEEBESESESSSESESESEEEASEALESEAAEEAEHEEEAREREAREODROEOE 


2.4.1.1 TESTS SWITCH (/TESTS:<TEST-LIST>) - 


<TEST-LIST> IS A SEQUENCE OF DECIMAL NUMBERS (1:2 ETC.) OR RANGES 
OF DECIMAL NUMBERS (1-5:8-10 ETC.), SEPERATED BY COLONS, THAT SPECIFY 
THE TESTS TO BE EXECUTED.TESTS WILL BE EXECUTED IN NUMERICAL ORDER 
REGARDLESS OF THE ORDER OF SPECIFICATION. THE DEFAULT IS TO EXECUTE 
ALL TESTS. ON THIS AND ALL SWITCHES, THE ANGLE BRACKETS <> ARE 
PUNCTUATION USED IN THE DEFINITION ONLY, AND ARE NOT TO BE TYPED By 
a SEE EXAMPLE AT END OF "EFFECT OF START COMMAND ” 


2.4.1.2 PASS SWITCH (/PASS:<PASS-CNT>) - 


<PASS-CNT> IS - ~ NUMBER INDICATING THE DESIRED NUMBER OF 
PASSES. A_ PASS DEFINED AS THE EXECUTION OF THE FULL DIAGNOSTIC 
CALL ee Tests). Spe DEFAULT IS NON-ENDING EXECUTION. IN THIS 
CASE, EXIT FROM PROGRAM IS ACCOMPLISHED EITHER BY TYPING A 
CONTROL /C OR BY OCCURANCE OF AN ERROR WITH THE HALT ON ERROR FLAG 
BEING SET. THE EXIT IS A RETURN TO COMMAND MODE. SEE EXAMPLE AT END 
OF “EFFECT OF START COMMAND” SECTION. 


2.4.1.3 FLAGS SWITCH (/FLAGS:<FLAG-LIST>) - 


<FLAG-LIST> IS A SEQUENCE OF ELEMENTS OF THE FORM <FLAG>, 
<FLAG=1>, OR <FLAG=0>, SEPARATED BY COLONS, WHERE <FLAG> HAS ONE OF 
THE FOLLOWING VALUES: 


HOE HALT ON ERROR, se C 


ERROR REPORTS. 
PRI OIRECT ALL MESSAGES TO A LINE PRINTER. 
PNT PRINT NUMBER OF TEST BEING EXECUTED. 
BOE BELL ON ERROR (NOT RELATED TO BELL PROMPTING). 
VAM RUN IN UNATTENDED MODE, BYPASSING MANUAL 
INTERVENTION CILLEGAL FOR tua DIAGNOSTIC). 
ISR INHIBIT STATISTICAL REPORTS 


Sz 


Ji 
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IDU INHIBIT DROP-ING OF UNITS By DIAGNOSTIC. 
(HAS NO EFFECT IN THIS DIAGNOSTIC. ) 
LOT LOOP ON TEST. 
THE FLAGS NAMED OR EQUATED TO 1 ARE SET, THOSE EQUATED TO O ARE 
CLEARED. A FLAG NOT SPECIFIED IS CLEARED. IF THE FLAGS SWITCH IS NOT 
GIVEN ALL FLAGS ARE CLEARED. SEE EXAMPLE AT END OF “EFFECT OF START 
COMMAND” SECTION. 


2.4.1.4 END OF PASS SWITCH (/EOP:<INCR>) - 


<INCR> IS A DECIMAL NUMBER INDICATING HOW OFTEN (CIN TERMS OF 
PASSES) IT IS DESIRED THAT THE END OF PASS MESSAGE BE PRINTED. T 
DEFAULT IS AT THE END OF EVERY PASS. SEE EXAMPLE AT END OF “EFFECT OF 
START COMMAND” SECTION. 


mn 


2.4.1.5 EFFECT OF START COMMAND - 


THE EFFECT OF THE START COMMAND IS TO INITIATE THE HARDWARE 
PARAMETER DIALOGUE , THE SOFTWARE PARAMETER OIALOGUE, THE 
INITIALIZATION QUESTIONS, AND THEN THE DIAGNOSTIC COMMENCES TESTING. 


VALUE AFTER THE PARENTHESES. FOR THE ACTUAL HARDWARE P-TABLE 
QUESTIONS SEE THE “HARDWARE PARAMETERS” SECTION. 


FOLLOWING THE HARDWARE QUESTIONS ARE THE SOFTWARE QUESTIONS TO 
BUILD THE SOFTWARE TABLES, WHICH DEFINE OPERATING PARAMETERS OF THE 
DIAGNOSTIC PROGRAM. THESE QUESTIONS ARE DESCRIBED IN THE "SOFTWARE 
PARAMETERS” SECTION. 


EXAMPLE: 
STA/TESTS:1:3-4:/PASS: 3/FLAGS: IER: HOE*1 


THIS COMMAND WILL CAUSE THREE PASSES TO BE MADE, WITH EACH PASS 
CONSISTING OF TESTS 1,3, AND 4. THERE IS NO DIFFERENCE BETWEEN SAYING 
<FLAG> AND SAYING <FLAG=1>. THE NOTATION <FLAG=0> IS MEANINGFUL ONLY 
ON A COMMAND OTHER THAN START TO CLEAR A FLAG THAT WAS PREVIOUSLY SET. 
NOTE THAT ON ALL COMMANDS ONLY THE FIRST THREE LETTERS ARE SCANNED. 


SEQ 9 
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2.4.2 RESTART COMMAND - 

PEEAPREAEEEOSERODESESESSEESEEEEEEEESESEDEDEEEDEREROEERDEDED EES 

RES( TART )/TESTS: < TEST -LIST>/PASS: <PASS -CNT>/FLAGS: 
<FLAG-LIST>/UNITS: <UNIT-LIST> 


SPRESESEESSESESSESSESAEEESSESEEESSEESESSEASEAESESSESSESAREESSAESERAEERSE 


2.4.2.1 TESTS, PASS, AND FLAGS SWITCHES - 


<TEST-LIST>, <PASS-CNT>, AND <FLAG-LIST> ARE AS IN THE START 
COMMAND . 


2.4.2.2 UNITS SWITCH (/UNITS:<UNIT-LIST>) - <UNIT-LIST> IS A ee 
OF DECIMAL NUMBERS (0,1 ETC.) OR RANGES OF DECIMAL NUMBERS (0-5, 8-10 
ETC.) THAT SPECIFY THE UNITS TO BE TESTED. THE NUMBERS ARE SEPARATED 
BY COLONS. THE NUMBERS MAY RANGE FROM O THRU N-1 (N IS THE NUMBER OF 
UNITS SPECIFIED IN THE wre oy: START COMMAND). THE HE NUMBER INDICATES 
THE POSITION OF THE P-TABLE AS THE DATA WAS ENTERED DURING THE 
HARDWARE DIAGLOGUE. THE UNITS WHICH ARE SELECTED MUST NOT HAVE BEEN 
DROPPED BY THE DROP COMMAND. SEE THE DISCUSSION OF ADD AND DROP 
COMMANDS BELOW. DEFAULT IS TO TEST ALL UNITS WHICH HAVE NOT BEEN 
DROPPED BY A DROP COMMAND. 


2.4.2.5 EFFECT OF RESTART COMMAND - 


THE RESTART COMMAND DIFFERS yp THE START COMMAND IN THAT THE 
P-TABLES FROM THE PREVIOUS START COMMAND (THERE MUST HAVE BEEN ONE) 
ARE USED, INSTEAD OF NEW ONES BEING BUILT. THE. UNITS SWITCH SHOULD 
NOT BE USED WITH THIS PROGRAM. THE SOFTWARE DIALOGUE MAY OPTIONALLY 
BE REEXECUTED (OPERATOR WILL BE ASKED). THE COMMAND CAN BE USED AFTER 
COMMAND MODE HAS BEEN REENTERED IN ANY OF THE THREE NORMAL WAYS: A) 
THE REQUESTED NUMBER OF PASSES HAVE BEEN MADE, 8) AN ERROR WAS 
ENCOUNTERED WITH THE HALT ON ERROR FLAG SET, OR C) A CONTROL/C WAS 
ENTERED BY THE OPERATOR. 


2.4.3 CONTINUE COMMAND - 


SESEAEERASERSESEREASEEEASEESEEDASAREASESHEAEEKREEHREDOEREEOEREDRELE 


CONC TINUE )/PASS: <PASS-CNT/FLAGS: <FLAG-LIST> 


SEEREEAEEEEEESACESEAEASEASSSEASESSEEASREAEEASEEEOHEEDEOLERERESE 


2.4.3.1 FLAG SWITCH (/FLAGS:<FLAG-LIST>») - 


<FLAG-LIST> IS SAME AS IN THE START COMMAND, BUT UNSPECIFIED 
FLAGS RETAIN THEIR CURRENT VALUE. 


SARHYRO PAR eT FUNC TST PART1 MACRO M1200 15-MAR-84 09:15 PAGE 12 


2.4.3.2 EFFECT OF CONTINUE COMMAND - 


CONTINUE MUST FOLLOW A START OR RESTART, AND COMMAND MODE MUST 
HAVE BEEN ENTERED DUE TO A HALT ON ERROR OR A CONTROL/C. THE EFFECT 
OF THE COMMAND IS TO GO TO THE BEGINNING OF THE TEST THAT WAS BEING 
EXECUTED WHEN THE HALT OR CONTROL/C TOOK PLACE. SOFTWARE DIALOGUE MAY 
OPTIONALLY BE REEXECUTED. HARDWARE PARAMETERS MAY NOT BE CHANGED. 


2.4.4 PROCEED COMMAND - 


SRABREEESESESSESESASEALEASALESESLASESEAEREALARAAEASHEEREAAREREEERSE 


PROC CEED )/FLAGS: <FLAG-LIST> 


SECEBRESESSESSASESESEEAASASERESLABAEARESEEEACAEAAREREREEADADALES 


2.4.4.1 FLAGS SWITCH (/FLAGS:<FLAG-LIST>) - 


<FLAG-LIST> IS AS IN THE START COMMAND, ®8UT UNSPECIFIED FLAGS 
RETAIN THEIR CURRENT VALUE. 


2.4.4.2 EFFECT OF PROCEED COMMAND - 


PROCEED MUST FOLLOW A START, RESTART, OR CONTINUE. COMMAND MODE 
MUST HAVE BEEN ENTERED VIA A HALT ON ERROR. THE EFFECT OF THE COMMAND 
IS TO BEGIN EXECUTION AT THE LOCATION FOLLOWING THE ERROR CALL. 
NETTHER HARDWARE NOR SOFTWARE PARAMETERS MAY BE ALTERED. 


2.4.5 ADD COMMAND - 
SHARBEERESESEEEREAEEREEEASEERESEREESSEADERERDDAREEEEEEEEDEEE 
ADD/UNITS: <UNIT-LIST> 


SERESESESSESSESASCASESAEEESESAAESESEAHEEESASASSEEEAEAREDASEEBASL 


2.4.6 EFFECT OF ADD COMMAND - 

THE UNITS SPECIFIED ARE ADDED TO THE TEST SEQUENCE. EACH 
UNIT MUST HAVE A_ P-TABLE IN MEMORY DUE TO AN EARLIER 
HARDWARE OIALOGUE. THIS COMMAND MUST BE FOLLOWED By A 
RESTART OR CONTINUE. THE UNITS SWITCH MUST BE SPECIFIED. 
THE ADD COMMAND MEANINGFUL ONLY FOR UNITS THAT WERE 
PREVIOUSLY DROPPED. 


2.4.7 DROP COMMAND - 


SHRERERERERESEAEEEEAEAEEEEOREEAEEEEEOERASERDREEOREDEEREEEED 
DROCP)/UNITS:<UNIT-LIST> 


RERERSARARERASEREAEAAEEEEEEEAEAAEREEESEEAEEEEEEREROEEEEERERDS 


SE 


Q 11 
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2.4.8 EFFECT OF DROP COMMAND - 

THE UNITS SPECIFIED WILL BE DROPPED FROM TESTING. THE UNITS 
WILL BE RESELECTED ONLY BY THE EXECUTION OF AN ADD OR START 
COMMAND. THE UNITS SWITCH MUST BE ENTERED. THIS COMMAND 
MUST BE FOLLOWED BY A RESTART OR A CONTINUE COMMAND. 


2.4.9 PRINT COMMAND - 


BEBBABEBRABESESELASBSBSALASALESBELASSALASCESESESESAAAAEEAAAREEAERE 


PRICNT) 


SEBEEEEAEBEEAEEBEAESLABEBSESESASEBSESLASASRALASAALESAABRAAARALLERRS 


2.4.9.1 EFFECT OF PRINT COMMAND - 

THE TOTAL NUMBER OF ERRORS FOR EACH UNIT SINCE THE LAST 
START OR RESTART COMMAND ARE PRINTED. THE ISR CINHIBIT 
STATISTICAL REPORTING) FLAG IS CLEARED. 


2.4.10 DISPLAY COMMAND - 


REBBEREEAABESESEESEAELABESEASESASESAESEEALAREAEABRABARERALEES 


DISCPLAY )/UNITS: <UNIT-LIST> 


SEERA RASSEBASESERAEAAEREAEEEALELASASEREARESADEREAALAAEEEEEREESE 


2.4.10.1 EFFECT OF DISPLAY COMMAND - 


THE HARDWARE P-TABLE FOR THE TEST STATION IS PRINTED IN 
FORMAT IN WHICH IT WAS ENTERED. 


2.4.11 FLAGS COMMAND - 


SEKAEEAEESEEAARERAEBESESEASEEESEASEEESERACESAAEEEEAEEAREDEERSE 


FLACGS) 


SERRRERAEEAAAEAASEEREREASSEEASESSEESAEEHESEASEAEEEERELERERARES 


2.4.11.1 EFFECT OF FLAGS COMMAND - 
THE CURRENT SETTINGS OF ALL FLAGS ARE PRINTED. 


THE 


Ni 
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2.4.12 ZFLAGS COMMAND - 


SEEAEBEESECEESESEBESEBASEBASEBAEASSESRE“SESESLESSESAASSEAEALELERS 


ZFLCAGS) 


PEBEESEBEREAEESESEBESESES&E&SALELBESEAESEZALERASAL HARASS 


2.4.13 ZFLAGS COMMAND - 
ALL FLAGS ARE CLEARED. 


2.4.14 CONTROL CHARACTERS - 


Cc 


A CONTROL/C (C) ENTERED DURING THE —— OF A 
DIAGNOSTIC CAUSES A RETURN TO COMMAND MODE 


A CONTROL/Z (Z) ENTERED ae ONE OF THE TWO 
OPERATOR OIALOGUES-- HARDWARE P-TABLE DIALOGUE OR 
SOFTWARE P-TABLE DIALOGUE CAUSES THE DEFAULTS TO BE 
TAKEN FOR THE REMAINDER OF THAT DIALOGUE. 


A i ig (O) ENTERED DURING THE EXECUTION OF A 
DIAGNOSTIC CAUSES ALL TELETYPE OUTPUT TO BE 
SURPRESSED FOR THE REMAINDER OF THE OIAGNOSTIC OR 
UNTIL ANOTHER CONTROL/O IS TYPED, WHICH RESTORES 
NORMAL TELETYPE OUTPUT. 


Be 
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2.5 WARDWARE QUESTIONS 


KHEN A DIAGNOSTIC IS STARTED, THE RUNTIME SERVICES WILL PROMPT 
THE USER FOR HARDWARE INFORMATION BY TYPING “CHANGE HW (L) ia 
YOU MUST ANSWER “Y” AFTER A START COMMAND UNLESS THE HARDWAR 
INFORMATION HAS BEEN “PRELOADED” USING THE SETUP UTILITY (SEE 
CHAPTER 6 OF THE XXDP+ USER'S MANUAL). WHEN YOU ANSWER THIS 
QUESTION WITH A “Y”, THE RUNTIME SERVICES WILL ASK FOR THE NUMBER 
OF UNITS CIN DECIMAL). YOU WILL THEN BE ASKED THE FOLLOWING 
QUESTIONS FOR EACH UNIT. 


CSR ADDRESS - THIS QUESTION REQUESTES THE CSR ADDRESS OF THE 
SPECIFIED DHU-11. THE DEFAULT ANSWER FOR THIS QUESTION IS 
ADDRESS 160460 (OCTAL). 


INTERRUPT VECTOR ADDRESS - THIS QUESTION REQUESTS THE INTERRUPT 
us eee OF THE SPECIFIED OHU-11. THE DEFAULT ANSWER IS 


jo Fh LINES BIT MAP - THIS QUESTION REQUESTS AN OCTAL BIT 
MAP OF THE SERIAL COMMUNICATION LINES ON THE DHU11 WHICH ARE 
ot ne Pease FOR TESTING. IF THE BIT IN THE BIT MAP IS SET 


BR LEVEL - THIS QUESTION REQUESTS THE INTERRUPT BR LEVEL OF 
THE SPECIFIED DHU-11. THE DEFAULT ANSWER IS BR S. 


SEQ 14 
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2.6 SOFTWARE QUESTIONS 


AFTER YOU HAVE ANSWERED THE HARDWARE QUESTIONS OR AFTER A RESTART 


OR CONTINUE COMMAND, THE RUNTIME SERVICES WILL ASK FOR SOFTWARE 


PARAMETERS. THESE PARAMETERS WILL GOVERN SOME ool SPECIFIC 


OPERATION MODES. YOU WILL BE PROMPTED BY “CHANGE Sw (L) ?” 


IF YOU WISH TO CHANGE ANY PARAMETERS, ANSWER BY TYPING 


“y", THE SOFTWARE QUESTIONS AND THE DEFAULT VALUES ARE DESCRIBED 


IN THE NEXT PARAGRAPH(S). 


REPORT UNIT NUMBER AS EACH UNIT IS TESTED - THIS QUESTION ASKS 
WHETHER THE PROGRAM SHOULD REPORT THE NUMBER OF THE UNIT WHICH 
IT IS TESTING AS IT BEGINS TO TEST THAT UNIT. 


ROM VERSION PRINTOUT ON THE FIRST PASS - THIS QUESTION ASKS 
WHETHER THE PROGRAM SHOULD PRINTOUT THE VERSIONS OF THE ON 
BOARD PROCESSOR ROMS DURING THE FIRST PASS OF THE PROGRAM. 


EXTENDED ERROR REPORTING - THIS QUESTION ASKS WHETHER EXTENDED 
ERROR INFORMATION IS REQUIRED OTHER THAN THE “TEST FAILED” 
MESSAGE. ON EACH ERROR REPORTED. THE DEFAULT IS “NO” I.E. ONLY 
a Ad ye REPORTING THE FACT THAT THE TEST FAILED WILL BE 


SHOULD BE RE 
FOR EACH TRANSMISSION TEST. ERRORS WHICH ARE — 


a Q 1 “, 


De 
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é.7 EXTENDED P-TABLE DIALOGUE 


WHEN YOU ANSWER THE HARDWARE QUESTIONS, YOU ARE BUILDING ENTRIES 
IN A_ TABLE THAT DESCRIBES THE DEVICES UNDER TEST. THE SIMPLEST 
WAY TO BUILD THIS TABLE IS TO ANSWER ALL QUESTIONS FOR EACH 

UNIT TO BE TESTED. IF YOU HAVE A MULTIPLEXED DEVICE SUCH AS 

A MASS STORAGE CONTROLLER WITH SEVERAL DRIVES OR A COMMUNICATION 
DEVICE WITH SEVERAL LINES, THIS BECOMES TEDIOUS SINCE MOST OF 
THE ANSWERS ARE REPETITIOUS. 


TO ILLUSTRATE A MORE EFFICIENT METHOD, SUPPOSE YOU ARE TESTING 

A FICTIONAL DEVICE, THE XY11. SUPPOSE THIS DEVICE CONSISTS OF 

A CONTROL MODULE WITH EIGHT UNITS (SUB-DEVICES) ATTACHED TO IT. 
THESE UNITS ARE DESCRIBED BY THE OCTAL NUMBERS O THROUGH 7. THERE 
IS ONE HARDWARE PARAMETER THAT CAN VARY AMONG UNITS CALLED THE 
Q-FACTOR. THIS Q-FACTOR MAY BE 0 OR 1. BELOW IS A SIMPLE way 

TO BUILD A TABLE FOR ONE XY11 WITH EIGHT UNITS. 


® UNITS (D0) ? 8<CR> 


i 
CSR ADDRESS (0) ? 160000<CR> 
SUB-DEVICE @ (0) ? O<CR> 
Q-FACTOR (0) 0 2? 1<CR> 


UNIT 2 

CSR ADDRESS (0) ? 160000<CR> 
SUB-DEVICE @ (0) ? 1<CR> 
Q-FACTOR (0) 1 ? O<CR> 


UNIT 3 

CSR ADDRESS (0) ? 160000<CR> 
SUB-DEVICE ® (0) ? 2<CR> 
Q-FACTOR (0) 0 2? <CR> 


UNIT 4 

CSR ADDRESS (0) ? 160000<CR> 
SUB-DEVICE @ (0) ? 3<CR> 
Q-FACTOR (0) 0 ? <CR> 


UNIT 5 
CSR ADDRESS (0) ? 160000<CR> 
SUB-DEVICE @ (0) 2? 4<CR> 
Q-FACTOR (0) 0? <CR> 


T6 
CSR ADDRESS (0) ? 160000<CR> 
SUB-DEVICE @ (0) ? 5<CR> 
Q-FACTOR (0) 0 ? <CR> 


UNIT 7 

CSR ADDRESS (0) ? 160000<CR> 
SUB-DEVICE ® (0) ? 6<CR> 
Q-FACTOR (0) 0 ? 1<CR> 


Re 
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UNIT 8 
CSR ADDRESS (0) 160000<CR> 
SUB-DEVICE # (0) ? 7<CR> 


) 
Q-FACTOR (0) 1? <CR> 


NOTICE THAT THE DEFAULT VALUE FOR THE Q-FACTOR CHANGES WHEN A 
NON-DEFAULT RESPONSE IS GIVEN. BE CAREFUL WHEN SPECIFYING 
MUL TIPLE UNITS! 


AS YOU CAN SEE FROM THE ABOVE EXAMPLE, THE HARDWARE PARAMETERS 
DO NOT VARY SIGNIFICANTLY FROM UNIT TO UNIT. THE PROCEDURE SHOWN IS 
NOT VERY EFFICIENT. 


THE RUNTIME SERVICES CAN TAKE MULTIPLE UNIT SPECIFICATIONS HOWEVER. 
ae THE SAME TABLE USING THE MULTIPLE SPECIFICATION 


® UNITS (D) ? 8<CR> 


T 1 
CSR ADDRESS (0) ? 160000<CR> 
SUB-DEVICE @ (0) ? 0,1<CR> 
Q-FACTOR (0) 0 ? 1,0<CR> 


UNIT 3 

CSR ADDRESS (0) ? 160000<CR> 
SUB-DEVICE @ (0) ? 2-5<CR> 
Q-FACTOR (0) 0 ? O<CR> 


UNIT 7 

CSR ADDRESS (0) ? 160000<CR> 
SUB-DEVICE @ (0) ? 6,7<CR> 
Q-FACTOR (0) 0 2? 1<CR> 


AS YOU CAN SEE IN THE ABOVE DIALOGUE, THE RUNTIME SERVICES WILL 
BUILD AS MANY ENTRIES AS IT CAN WITH THE INFORMATION GIVEN IN ANY 
ONE PASS THROUGH THE QUESTIONS. IN THE FIRST PASS, TWO ENTRIES 


SERVICES ASSUME THAT THE CSR ADDRESS IS 160000 FOR BOTH SINCE IT 
WAS SPECIFIED ONLY ONCE. IN THE SECOND PASS, FOUR ENTRIES WERE 


FROM THE FIRST NUMBER TO THE SECOND. IN THIS CASE, SUB-DEVICES 
2. 3, 4 AND 5S WERE SPECIFIED. (IF THE SUB-DEVICE WERE SPECIFIED 
BY ADDRESSES. THE INCREMENT WOULD BE BY 2 SINCE ADDRESSES MUST 
BE ON AN EVEN BOUNDARY.) THE CSR ADDRESSES AND Q-FACTORS FOR 
THE FOUR ENTRIES ARE ASSUMED TO BE 160000 AND O RESPECTIVELY 
SINCE THEY WERE ONLY SPECIFIED ONCE. THE LAST TWO UNITS ARE 
SPECIFIED IN THE THIRD PASS. 


THE WHOLE PROCESS COULD HAVE BEEN ACCOMPLISHED IN ONE PASS AS 
SHOWN BELOW. 


@ UNITS (D0) ? 8<CR> 


wr “ 
s ; 


Fe 
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UNIT 1 

CSR ADDRESS (0) ? 160000<CR> 
SUB-DEVICE #@ (0) ? O-7<CR> 
Q-FACTOR (0) 0 ? GO, 300. ccek- i<tRs 


AS YOU CAN SEE FROM THIS EXAMPLE, NULL REPLIES (COMMAS ENCLOSING 
A NULL FIELD) TELL THE RUNTIME SERVICES TO REPEAT THE LAST REPLY. 


2.8 QUICK START-UP PROCEDURE (XxXDP-) 
TO START-UP THIS PROGRAM: 
1. BOOT XXDP-. 
2. GIVE THE DATE AND ANSWER THE LSI/UNIBUS AND SOHZ (IF THERE 
IS A CLOCK) QUESTIONS. NOTE, NOT ALL VERSIONS OF XxDP+ ASK 
FOR THE CLOCK FREQUENCY 


5. TYPE "R NAME”, WHERE NAME IS THE NAME OF THE BIN OR 
BIC FILE FOR THIS PROGRAM 


TYPE “START” 

ANSWER THE “CHANGE HW” QUESTION WITH “Y” 

ANSWER ALL THE HARDWARE QUESTIONS 

ANSWER THE “CHANGE SW” QUESTION WITH “N” 

WHEN YOU FOLLOW THIS PROCEDURE YOU WILL BE USING ONLY THE 


DEFAULTS FOR FLAGS AND SOFTWARE PARAMETERS. FOR CEFAULT INFORMATION 
SEE THE SECTIONS WITHIN THIS DOCUMENT ON FLAGS,AND HARDWARE QUESTIONS. 


un oO wy & 


Ge 
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3.0 ERROR INFORMATION 
3.1 TYPES OF ERROR MESSAGES 


THERE ARE THREE LEVELS OF ERROR MESSAGES THAT MAY BE ISSUED BY 

A DIAGNOSTIC: GENERAL, BASIC AND EXTENDED. GENERAL ERROR MESSAGES 

ARE ALWAYS eaurte UNLESS THE “IER” FLAG IS SET (SEE THE FLAGS SECTION 
OF THIS DOCUMENT). 


THE GENERAL ERROR MESSAGE IS OF THE FORM: 


NAME TYPE NUMBER ON UNIT NUMBER TST NUMBER PC: XXxxxx 
ERROR MESSAGE 


»WHERE; NAME = DIAGNOSTIC NAME 
TYPE = ERROR TYPE (SYS FATAL, DEV FATAL, HARD OR SOFT) 
NUMBER = ERROR Dey? 
UNIT NUMBER = 0 - N CN IS LAST UNIT IN PTABLE) 
TST NUMBER = Test AND SUBTEST WHERE ERROR OCCURRED 
PC:XXXXXX = ADDRESS OF ERROR MESSAGE CALL 


BASIC ERROR MESSAGES ARE MESSAGES THAT CONTAIN SOME ADDITIONAL 
INFORMATION ABOUT THE ERROR. THESE ARE ALWAYS PRINTED UNLESS 
THE “IER” OR “IBR” FLAGS ARE SET (SEE THE FLAGS SECTION OF THIS 


DOCUMENT ). 

THESE MESSAGES ARE PRINTED AFTER THE ASSOCIATED GENERAL MESSAGE. 
EXTENDED ERROR MESSAGES CONTAIN SUPPLEMENTARY ERROR INFORMATION 
SUCH AS REGISTER CONTENTS OR GOOD/BAD DATA. THESE ARE ALWAYS 
PRINTED UNLESS THE “IER”, “IBR” OR “IXR” FLAGS ARE SET (SEE THE 


NT). 
THESE MESSAGES ARE PRINTED AFTER THE ASSOCIATED GENERAL ERROR 
MESSAGE AND ANY ASSOCIATED BASIC ERROR MESSAGES. 


He 
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3.2 SPECIFIC ERROR MESSAGES 


THIS PROGRAM IS INTENDED TO PROVIDE A GO/NOGO INDICATION 
OF THE FUNCTIONALITY OF THE DHU-11 BOARDS. TO EXECUTE THE 
PROGRAM IN THIS MODE THE OPERATOR NEED ONLY ANSWER THE 
“EXTENDED ERROR REPORTING” SOFTWARE QUESTION WITH “NO”, THE 
PROGRAM WILL THEN ONLY PRINT THE NAME OF THE FAILING TEST 
THE TEST AND ERROR NUMBERS. FOR A LIST OF THE TEST NAMES 
IN THIS PROGRAM SEE THE TEST SUMMARIES SECTION OF THIS 
pot AN EXAMPLE OF SUCH A AN ERROR MESSAGE IS THE 


CZD0HU DVC FTL ERR 01603 ON UNIT O2 TST 16 SUB 000 PC: XXXXxx 
DEVICE REGISTER WORD READ/WRITE TEST FAILED. 


THIS ERROR INDICATES THAT A FATAL ERROR WAS ENCOUNTERED WITHIN 
ie TR TESTS THE READ/WRITE CAPABILITY OF THE DHU-11 


IF THE OPERATOR HAD REQUESTED EXTENDED ERROR REPORTING THE 
SAME ERROR WOULD BE REPORTED AS FOLLOWS: 


CZDHU DVC FTL ERR 01603 ON UNIT O2 TST 16 SUB 000 PC: XXXXxx 
DEVICE REGISTER WORD READ/WRITE TEST FAILED. 
BAD BIT(S) IN DEVICE TBUFFAD1 REGISTER FOR LINE 7 (D). 
EXPECTED DATA: 000000 (0). 
ACTUAL DATA: 000023 (0). 


4.0 PERFORMANCE AND PROGRESS REPORTS 


AT THE END OF EACH PASS, THE PASS COUNT IS GIVEN ALONG WITH THE 
TOTAL NUMBER OF ERRORS REPORTED SINCE THE DIAGNOSTIC — 


OF PASS MESSAGE IS PRINTED. FOR FUTHER INFORMATION SEE THE 
SWITCHES SECTION OF THIS DOCUMENT. 


SEQ 20 


Te 
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5.0 TEST SUMMARIES 


THE FOLLOWING ARE INCLUDED WITHIN CZDHUB: 


1. DEVICE REGISTER ACCESS TEST - VERIFIES THAT THE UUT REGISTERS 
WILL RESPOND WITH THE CORRECT UNIBUS HANDSHAKING SIGNALS. 
VERIFIES THAT THE UUT IS AT THE CORRECT ADDRESS. 


2. MASTER.RESET CSELFTEST) TEST - VERIFIES THAT THE ne RESET 
BIT CLEARS WITHIN A SPECIFIED TIME OF IT BEING SE 


3. MASTER.RESET (SKIP SELFTEST) TEST - VERIFIES THAT THE MASTER 
RESET CLEARS WITHIN A sy TIME AFTER IT IS SET WHEN THE 
SKIP SELFTEST SEQUENCE IS USED. 


4. RX.CHARACTER FIELD TEST - VERIFIES THAT THE DATA BITS OF THE 
CODES IN THE RXFIFO AFTER A MASTER RESET “ey SKIP SELFTEST 
ARE CONSISTANT WITH THE SKIP SELFTEST CODES 


5. RX.FLAG FIELD TEST - VERIFIES THAT THE 3 DATA STATUS BITS 
( OVERRUN, FRAMING AND PARITY ERROR BITS) ARE ALL SET ON 
EACH OF THE SKIP SELFTEST CODES IN THE FIFO AFTER A MASTER 
RESET AND SKIP SELFTEST SEQUENCE. 


6. RX.DATA.AVAIL TEST - VERIFIES THAT THE RX.DATA. AVAIL ae Ts 
SET WHEN THE SKIP SELFTEST CODES ARE IN THE FIFO AND T 
IT CLEARS AFTER THEY HAVE BEEN READ. 


7. RX.DATA.V .ID TEST - VERIFIES THAT THE RX.DATA.VALID BIT IS 
SET FOR ft THE CODES IN THE FIFO AND CLEAR AFTER ALL THE 
CODES HAVE BEEN READ. 


8. RX.LINE FIELD TEST - VERIFIES THAT THE RX.LINE LINE FIELDS ARE 
CORRECT FOR THE SKIP SELFTEST CODES. 


9. BMP CHECK TEST - VERIFIES THAT THE DUT DOES NOT IMMEDIATELY 
runerwie MONITOR PROGRAM, AS THIS MAY INVALIDATE 


10. SKIP SELFTEST TEST - VERIFIES THAT THE DUT SKIPS THE SELFTEST 
IN THE TIME ALLOWED, AND THAT THE FIFO CONTAINS THE CORRECT 
CODES AFTER ITS COMPLEATION. 


11. DIAGNOSTIC.FAIL (SKIP SELFTEST) TEST - VERIFIES USING T 
SKIP SELFTEST SEQUENCE THAT THE DIAG.FAIL BIT GOES TO BOTH 
THE ACTIVE AND INACTIVE STATES WITHIN THE ALLOWED TIMES. 


le. SELFTEST TEST - VERIFIES THAT THE DUT'S SELFTEST EXECUTES 
WITHIN THE CORRECT TIME AND THAT THE CORRECT CODES ARE 
RETURNED IN THE FIFO AFTER ITS COMPLEATION. 


13. pg FAIL TEST - VERIFIES THAT THE DUT WILL REPORT 
RRORS CORRECTLY WHEN IT IS FORCED TO FAIL. 


Je 


6 ¢ TST PART MACRO M -MAR - , p : 
SABHEO Pr nf UNC 5 1 CRO M1200 15 84 09:15 PAGE 22-1 


14. 


15. 


16. 


17. 


18. 


19. 


20. 
21. 


22. 


23. 


ROM VERSION NUMBER - VERIFIES THAT THE ROM VERSION NUMBERS 
ARE REPORTED CORRECTLY AND IF REQUESTED PRINTS THEM OUT. 


CSR BIT 4 TEST - VERIFIES THAT WHEN SET THIS BIT CAUSES 
THE SELFTEST TO LOOP, AND WHEN CLEARED THE SKIP SELFTEST 
CODES ARE RETURNED IN THE RXFIFO. 


WORD ACCESS READ/WRITE TEST - VERIFIES THAT THE REGISTERS 
RESPOND CORRECTLY TO READ AND WRITE ACCESSES. 


WORD ACCESS READ/MODIFY/WRITE TEST - VERIFIES THAT THE 
REGISTERS WILL RESPOND CORRECTLY TO READ/MODIFY/WRITE ACCESES. 


BYTE ACCESS READ/WRITE TEST - VERIFIES THAT THE REGISTERS WILL 
RESPOND CORRECTLY TO BYTE READ/WRITE ACCESSES. 


BYTE ACCESS READ/MODIFY/WRITE - VERIFIES THAT THE REGISTERS 
WILL RESPOND CORRECTLY TO BYTE READ/MODIFY/WRITE ACCESSES. 


ID.BIT TEST - VERIFIES THAT THE ID BIT READS AS SET. 


TX.ENABLE CINACTIVE) TEST - VERIFIES THAT WHEN A LINE'S TX.ENBL 
BIT IS CLEAR, TRANSMISSION WILL NOT TAKE PLACE ON THAT LINE. 


TX.ENABLE CACTIVE) TEST - VERIFIES THAT WHEN A LINE’S TX.ENBL 
BIT IS SET, TRANSMISSION WILL TAKE PLACE ON THAT LINE. 


INTERRUPT TEST - VERIFIES THAT THE DUT WILL GENERATE RECEPTION 
AND TRANSMISSION INTERRUPTS CORRECTLY. 


BR LEVEL TEST - VERIFIES THAT THE DUT INTERRUPTS AT THE CORRECT 
BUS REQUEST LEVEL. 


DIAGNOSTIC FIELD (BMP) TEST - VERIFIES THAT A REQUEST TO THE 
DUT TO REPORT BMP STATUS CODES IS COMPLIED WITH WITHIN THE 
SPECIFIED TIME. ALL ACTIVE LINES ARE TESTED. 


REPORT BMP CODES TEST - THIS PSEUDO TEST REPORTS THE FIRST 32 
BMP CHARACTERS WHICH WERE DISCOVERED IN THE FIFO DURING THE 
EXECUTION OF THE OTHER TESTS. THIS AVOIDS INTERRUPTION OF THE 
OTHER TESTS BY THESE CODES IF THEY ARE NOT CRITICAL TO THE 
PERFORMANCE OF THE TESTS. 


Ke 


SERHWBO DHL AA FUNC TST PART1 MACRO M1200 15-MAR-84 09:15 PAGE 23 SEQ 22 


6.0 EXAMPLE ERROR FREE PASS 
THE FOLLOWING IS AN EXAMPLE OF AN ERROR FREE PASS DIALOGUE: 


.R CZDHUBO 
CZDHUBO.BIN 


DRS 

CZDHU-B-O 

DHU-11 FUNC TST PARTI 
UNIT IS DHU-11 

RESTRT ADDR: 147670 
DR>STA/PAS:1 


CHANGE HW (LD) ? Y 
® UNITS (0D) ? 2 


UNIT O 
CSR ADORESS: (0) 160460 ? tZ 


UNIT 1 

CSR ADDRESS: (0) 160460 ? 160500 
INTERRUPT VECTOR ADDRESS: (O) 310 ? 320 
ACTIVE LINE BIT MAP: (0) 177777 ? <CR> 
INTERRUPT BR LEVEL: (0) 5S ? <CR> 


CHANGE SW (L) ? Y 

REPORT UNIT NUMBER AS EACH UNIT IS TESTED: (LL) Y ? <CR> 

ROM VERSION PRINTOUT ON THE FIRST co (L) Y ? <CR> 

EXTENDED ERROR REPORTING: (L)N ? Y 

NUMBER OF INDIVIDUAL DATA ERRORS TO REPORT ON ALINE: (0) 071 
TESTING UNIT : OCD) 


ROM VERSION NUMBERS: PROC_1 = 2(D) PROC_2 = 2(D) 


TESTING UNIT : 1(D) 
ROM VERSION NUMBERS: PROC_1 = 2(D) PROC_2= 2(D) 
CZDHU EI 


OP 1 
O TOTAL ERRS 
DR> 


CZDHUBO DHU-11 oe TST PARTI 


PROGRAM COCUMENT 


000000 


002000 


002000 


Le 
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-LIST SEQ,LOC,BIN,MEB 
-NLIST CND 


.SBTTL PROGRAM HEADER 


-MCALL SVC 
SVC ; INITIALIZE SUPERVISOR MACROS 


IF STRUCTURED MACROS ARE TO BE USED, ADD ”.MCALL STRUCT” AND “STRUCT” 
TO INITIALIZE THE STRUCTURED MACROS. 


SVCINS= 1 3 LIST INSTRUCTIONS, SHIFTED RIGHT 
SVCTST= 1 ; LIST TEST TAGS, SHIFTED RIGHT 
SVCSUB= 1 ; LIST SUBTEST TAGS, SHIFTED RIGHT 
SVCGBL= 1 ; LIST GLOBAL TAGS, SHIFTED RIGHT 
SVCTAG= 1 3; LIST OTHER TAGS, SHIFTED RIGHT 


3 CHANGE THE VALUES OF THE SVC... SYMBOLS TO BE ZERO IF YOU WISH 
$ TO ALIGN THE MACRO CALLS AND THEIR EXPANSIONS. CHANGE THE 

3 SYMBOLS TO BE MINUS-ONE TO NOT LIST THE EXPANSIONS. YOU MAY 
3 CHANGE THE 
8 


SYMBOLS AT ANY POINT IN YOUR PROGRAM 
MECNAASAASA AAALAC SASS SSAA SSAA SSSA SAKA KSASSSASSSSSS 


$++ 
; THE PROGRAM HEADER IS THE INTERFACE BETWEEN 
; THE DIAGNOSTIC PROGRAM AND THE SUPERVISOR. 
Bee 


POINTER BGNRPT .BGNSW,BGNSF T,BGNDU,ERRTBL 


HEADER CZDHU,B,0,16,0,PRIO7 


LSREV:: 


SEO 24 


bARHHRO ay tt) FUNC TST PARTI 


000016 
036700 
037072 
002212 
002224 
037454 
000000 


004036 
024222 


Me 
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B& 
L$DEPO aacaie 
SscII 
LSUNIT 
L$TIML 
. WORD 
L $HPCP 
WORD 
LS$SPCP:: 
. WORD 
LS$HPTP:: 
4 D 
L$SPTP:: 
. WORD 
L$LADP:: 
‘ D 
LSSTA:: 
D 
L$COo:: 
LSDTYP:: 
LS$APT:: 
. WORD 
LSDTP:: 
. WORD 
L$PRIO:: 
. WORD 
LSENVI:: 
. WORD 
LSEXP1:: 
. WORD 
LSMREV:: 
-BYTE 
.BYTE 
LSEF:: 
. WORD 
. WORD 
L$SPC:: 
. WORD 
LSDEVP:: 
. WORD 
LSREPP: : 
. WORD 
LSEXP4:: 
. WORD 
LSEXPS: : 
. WORD 
LS$AUT:: 
.WORD 
L$DUT:: 
LSLUN:: 
. WORD 
LSDESP:: 
. WORD 


16 

L $HARD 
L$SOFT 
L $HwW 
L$Sw 
L$LAST 
0 

0 

0 

0) 
LSDISPATCH 
PRIO7 
9) 

0 


CSREVISION 
CSsEDIT 


0 
0 


0 
LsDvTYP 
L$RPT 


BARHYRO DE ObA FUNC TST PARTI 


1137 


104025 
003766 
024236 
025060 
025056 
024230 
000000 
000000 
000000 


Ne 
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L$LOAD: : 


LSETP:: 
LSICP:: 


L$CCP:: 
LSACP:: 
LSPRT:: 
L$TEST:: 
L$OLY:: 
LS$HIME: : 


E$LOAD 
LSERRTBL 
L$INIT 
L$CLEAN 
LSAUTO 
L$PROT 
0 

0 

9) 


SEG 24 


1157 


FUNC TST PARTI 


BS 
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3? 

; THE DISPATCH TABLE CONTAINS THE STARTING ADDRESS OF EACH TEST. 
; If IS USED BY THE SUPERVISOR TO DISPATCH TO EACH TEST. 

3° 


DISPATCH 26 
. WORD 
L $OISPATCH:; 


SSSSSSSGSSSSSSSSSSSOREE35 


SEG 27 


GFOPMPEAOPMade FUNC TST PARA 
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-SBTTL DEFAULT HARDWARE P-TABLE 


3° 


; THE DEFAULT HARDWARE P-TABLE CONTAINS DEFAULT VALUES OF 


; THE TEST-DEVICE PARAMETERS. 


THE STRUCTURE OF THIS TABLE 


; IS TDENTICAL TO THE STRUCTURE OF THE HARDWARE P-TABLES, 
; AND IS USED AS A “TEMPLATE” FOR BUILDING THE P-TABLES. 


a6 
BGNHW 


OF PTBL 


L $HW: ; 
OFPTBL:: 
sDEFAULT CSR ADDRESS 
sDEFAULT VECTOR ADDRESS 
sDEFAULT ACTIVE LINES BIT MAP 
sDEFAULT BR LEVEL 
L 10000: 


. WORD 


L 10000 -L $HW72 


D3 
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1200 
1501 
120 _SBTTL SOFTWARE P-TABLE 
1505 * 
; THE SOFTWARE TABLE CONTAINS VARIOUS DATA USED BY THE 
1206 ; PROGRAM AS OPERATIONAL PARAMETERS. THESE PARAMETERS ARE 
1207 ; SET UP AT ASSEMBLY TIME AND MAY BE VARIED BY THE OPERATOR 
1208 ; AT RUN TIME. 
1210 
1211 002222 BGNSW SFP TBL 
002222 000002 casw,, "MORO L20001 -L ssuz2 
sal 002224 SFPTBL: : 
1213 002224 000021 OPTION: : .WORD 21 ;BIT MAP OF PROGRAM CONTROL FLAGS 
1214 002226 000000 NDERPT: : “WORD 0 ;DEFAULT NUMBER OF INDIVIDUAL DATA ERRORS TO RPT. 
1216 002230 ENDSW 


002230 L10001: 


Sor Tuane Pp 


le 
1267 0022350 


E UNC TST PARTI 


000020 
177777 


000004 
000006 
000016 


cS 
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-SBTTL GLOBAL EQUATES SECTION 


3¢** 

; THE GLOBAL EQUATES SECTION (hatte PROGRAM EQUATES THAT 
; ARE USED IN MORE THAN ONE TEST 

=a 


NUML NS = =20 sNUMBER OF LINES ON DHU11 IS 16. 
MAPLNS=*177777 ;BIT MAP OF LINES ON DHU11. 


;eeeeee Ghote REGISTER OFFSETS FROM THE CSR‘'S ADDRESS eeseae 
LPRO== sLINE PARAMETER REGISTER OFFSET FROM THE CSR ADDRESS 
Fai $0--6 }FIFOSIZE/STATUS REGISTER OFFSET FROM THE CSR ADDRESS 
TXBFCO=-16 : TRANSMIT COUNT REGISTER OFFSET FROM THE CSR ADDRESS 
EQUALS 


5 

; BIT OIF INITIONS 
é 

BIT15== 100000 


é 
; EVENT FLAG DEFINITIONS 
; EF32:EF17 RESERVED FOR SUPERVISOR TO PROGRAM COMMUNICATION 


EF .START=- 52. : START COMMAND WAS ISSUED 
EF .RESTART == Si. : RESTART COMMAND WAS ISSUED 
EF .CONTINUE== 30. ; CONTINUE COMMAND WAS ISSUED 


CZDHUBO DHU-11 FUNC Uy PARTI 


GLOBAL EQUATES SECTI 


1268 


000034 
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EF .NEW== 
EF .PWR== 
a 


rs 


; 
; PRIORITY LEVEL DEFINITIONS 


é 

PRIO7== 340 
PRIO6== 300 
PRIOS== 240 
PRIO4== 200 
PRIO3== 140 
PRIO2== 100 
PRIO1== 40 
PRIOO== 0 

5 

;OPERATOR FLAG BITS 
a 

EVL== 4 
LOT== 10 
ADR== 20 
IDU== 40 
ISR== 100 
UAM== 200 
BOE == 400 
PNT== 1000 
PRI== 2000 
IXE == 4000 
IBE== 10000 
IER== 20000 
LOE== 40000 
HOE== 100000 


A NEW PASS HAS BEEN STARTED 
A POWER -FAIL /POWER-UP OCCURRED 


SEG 


31 


GLOBAL EQUATES SecTron PART? 


002312 
002314 


177777 
000300 
000304 
000000 

004 


MACRO M1200 
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-SBTTL GLOBAL DATA SECTION 


3* 
3 THE GLOBAL DATA a tS ome CONTAINS DATA THAT ARE USED 
; IN MORE THAN ONE TES 


§ MESEAESEESESERESEASESESEERSAREDEASEHESASAREEAEEREREEEEROEREDROREREREEESS 


UNIT VARIBLE AREA 


@ 
§ PESESASESAEEEEEEEASEESESEEEEEAEEAAEREEEEREEAEEREEEROREEEROEEEEDREEERESEES 


ACTLNS:: 


. WORD 


177777 


sACTIVE LINE BIT MAP. 


NUMBER . 
s INTERRUPT BUS REQUEST LEVEL 


§ SHSSSSSAAAHAOSESASEASESASSEAESASSEASRESEREREHAEHEEAEEEEEEEEEEEEEEDEREEESE 


DEVICE REGISTER ADDRESS TABLE 


$ 
§ SSSSSAESSSSESASASASEAHAEERASESEAESAEASESEASASEEESEROAREEESAREREAEEERALEES 


RXTMA:: 
FDATA:: 


ADRT:: 


DR 

CSRA:: 

RBUFA:: 
LPRA:: 


FSLSA:: 


. WORD 
- WORD 
- WORD 
. WORD 


sDHU-11 CSR ADDRESS. 

sDHU-11 RECIEVE BUFFER/TIMER ADDRESS. 

sDHU-11 LINE PARAMETER REGISTER ADDRESS. 

sDHU-11 FIFO SIZE/LINE STATUS REGISTER ADDRESS, 
sAND FIFO DATA REGISTER ADDRESS. 

sDHU-11 LINE CONTROL REGISTER ADDRESS. 

sOHU-11 TRANSMIT BUFFER 1 REGISTER ADORESS 
sDHU-11 TRANSMIT BUFFER 2 REGISTER ADDRESS 
sDHU-11 TRANSMIT BUFFER COUNT REGISTER ADDRESS 


Nee GEETETER PEREADE AUUERER Cee nnneaaeensasnsaccscozonenocccescece 
TABLE 


REGISTER MESSAGE ADDRESS 


§ SOOO 688 648068086 6606606666066 8 60066660666 0068860006000000004808060660006000600888008 


RMATBB:: . 


sADODRESS OF “CSR” MESSAGE. 
ADDRESS OF 


2" ME 
sADDRESS OF “TBUFFCT” MESSAGE. 


§ £8986 66604606406666404666466066460666666006400006600600602028060568600800602000060008060000028 


ASSORTED GLOBAL VARIABLES: 


§ PPSSEEKESKEHEHESSEESESASESAAEAESOEHAAESSEAEASEASEAAEASASEASAAREKAKEOEEEASEEEEEEEEE 


ooooo°o 


sSTORAGE FOR ae Sy CHARACTER BUFFER POINTER. 

:"EXIT ON ERROR” 

} STORAGE FOR THE CONTROL -C FLAG, 

;STORAGE FOR THE INTERRUPT ENABLE BIT STATES. 

3STO'G FOR PASS COUNT USED IN ROM — TEST. 
; STORAGE FOR RECEIVER INTERRUPT FLAG 


J” 


| 


™ 


GEBBAD DRT Sect YOm TST PART 


177572 
000000 


000000 
172340 


HS 
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RXINTF:: .WORD 0O sSTORAGE FOR RECEIVER INTERRUPT FLAGS. 
TP4FLG:: .WORD O sFLAGS SET WHEN AN EXPECTED 004 TRAP OCCURS. 
TP4VEC:: .WORD O sSTORAGE FOR THE NORMAL 004 TRAP VECTOR. 
TSTNUM:: .WORD 1 sSTORAGE FOR THE TEST NUMBER. 

TXINTC:: .WORD O sSTORAGE FOR TRANSMIT INTERRUPT COUNT. 
TXINTF:: .WORD O sSTORAGE FOR TRANSMIT INTERRUPT FLAGS. 
WORD1: -WORD 0O sLOCATION FOR PASSING INDIRECT PARAMETERS. 


§ FASESAAESEEASESEESASASEEEEAEASALAREEREEESEDEDADEDEEARERERERARERAREREEERAREEEDS 
; LINE TIME CLOCK VARIABLES AND STORAGE. 
§ FEREESEEEAEEAEAASEREREEEAEAREREEAAAEAEREEEEEEAEAEADASARERAREEAREAERREEEREREEDS 
CLKCSR:: .WORD 177546 ;CSR ADDRESS OF THE LTC. 
CLKBRL:: .WORD PRIO6 ;INTERRUPT PRIORITY LEVEL OF THE LTC. 


CLKVEC:: .WORD 100 sINTERRUPT VECTOR ADDRESS OF THE LTC. 
CLKHRZ:: .WORD 60. s INTERRUPT FREQUENCY OF THE LTC. 
TIMER1:: .WORD O sHAROWARE CLOCK COUNTER ¢1. 

TIMER2:: .WORD O sHARDWARE CLOCK COUNTER #2. 

TIMERS:: .WORD 120. sHARDWARE BREAK COUNTER LOCATION. 
BCOUNT : 120 sBREAK COUNT VALUE IN CLOCK TICKS. 


:: .WORD ‘ 
MSTICK:: .WORD 17. sNUMBER OF MILLI-SECONDS PER LTC TICK. 
MSLCNT:: .WORD 62 sLOOP COUNT CUSED BY MSLOOP) TO DELAY 1 MS. 


j MERPASAESSESESESESASEAEASEDASEAESESESEEAREDAAEASERSEESAARARERRESEDEDALALALEEEE 
| MEMMORY MANAGEMENT VARIABLES AND FLAGS. 
§ #80066066660646060056260666406646646664600666460666000664606060006464640004608460b4400006 
:: .WORD 177572 ;ADDRESS OF MEM MGT STATUS REGISTER #60. 
-WORD O 3MEM MGT PRESENT FLAG (O IF MM NOT PRESENT). 
-WORD O sMEM MGT ENABLED FLAG (O IF MM NOT ENABLED). 
PAROA:: .WORD 172340 ;ADDRESS OF MEM MGT PAR 900. 


§ AORARORARESOESEOEEEEDEEESEEEOOOOO$46000600000004600600600000060060808000408 
; BIT MASK TABLE OF UN-USED DHU DEVICE REGISTER BITS. 
§ PHSOELOESEEOOO4OEEOEEEEEEOEOOOOO000066006000000000000000000000000000008 
UNBTTB::.WORD 137660 ;UNUSED BIT MASK FOR THE CSR 
WORD 177777 UNUSED BIT MASK FOR THE RBUF/RXTIMER REG 
WORD 7 sUNUSED BIT MASK FOR THE LPR 
WORD 177777 ;UNUSED BIT MASK FOR THE STAT/FIFOSIZE/DATA REG 
WORD 166051 ;UNUSED BIT MASK FOR THE LNCTRL 
WORD 0 sUNUSED BIT MASK FOR THE TBUFFAD1 
WORD 177774 ;UNUSED BIT MASK FOR THE TBUFFAD2 
WORD O sUNUSED BIT MASK FOR THE TBUFFCT 


3 SESSOSEEHESESSEHEHESASHSEEHEASEHASEEEASESEASESAREAEALASALASALEEKRERELERERELECEELE 


: TABLE OF WORDS WITH CORRESPONDING BIT SET FOR GENERATION OF BIT MAPS. 
§ SPSOAAHEAADHAAASEESSALESOESESEEESHEESHOEEEEEEREADEEREDEEEEEDEDALADRLESELESEESS 
BITTBL:: .WORD 1 sBIT O SET. 

-WORD 2 sBIT 1 SET. 

WORD 4 3BIT 2 SET. 

. WORD 10 ;BIT 3 SET. 

.WORD 20 ;BIT 4 SET. 

-WORD 40 sBIT S SET. 

-WORD 100 sBIT 6 SET. 

-WORD 200 3sB8IT 7 SET. 

-WORD 400 ;sBIT 8 SET. 

. WORD 1000 ;BIT 9 SET. 

. WORD 2000 ;BIT 10 SET. 

. WORD 4000 sBIT 11 SET 


SEQ 3% 


SEBNE%ORIY Bbc SHBG "ST PRT 


1444 
1445 


002440 


000000 


iS 
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. WORD 10000 sBIT 12 SET. 
-WORD 20000 sBIT 13 SET. 
-WORD 40000 ;BIT 14 SET. 
. WORD 100000 ;BIT 15 SET. 


§ FPSSEEESEEEAASESESESALESESEEAAEEEEEERAAEEAAEESEEESEEEREAEEEAEAAEEEAEEREAEEBAEDES 


;* GPR SAVE AREA ZERO. 


§ PESASEASSEEESESESESEESEEERERESEREEEDERERAEEEEEREEEEREAEEEEREAEEEEEEEAEEEADDAESE 


GPRSOB: : sBASE OF GPR SAVE AREA NUMBER ZERO. 
-WORD 0 sWORD 1, STORAGE FOR R1. 
-WORD O sWORD 2, STORAGE FOR Re. 
-WORD 0 sWORD 3, STORAGE FOR R3. 
-WORD 0 sWORD 4, STORAGE FOR R4. 
-WORD 0 sWORD 5S, STORAGE FOR RS. 


j PARSAESEAEEAESESEREEEASESESEREESASEEEEEEEAEDSEEEAADEAAEDERESEEAEAEEAAEEEEAEDEES 
3:4 TRANSMISSION AND RECEPTION VARIABLES, POINTERS, AND FLAGS. 
i PEREAEAESASASEDREESALEEEEEAEEESEREEASERERESEREEESEEAREEEESEASEREEEDEDEEAEEEDESS 
ERSMRF:: .WORD O sERROR SUMMARY REPORT FLAGS. 
ERCNTB:: .BLKW 16. sTABLE OF ERROR COUNTERS. 


j MPRSSAORERESASEAAEEESAESEEAEEEREREAAEEEESESEREEEEEARESEREREEEEEEEEREDEDEEEEDES 
; STORAGE AREA FOR THE BMP CODE QUEUE. 

j PERSSSEAAEESEAEEEEEOEEASESSREAEEREDEEDAEEEEDEEEDDEEEEEEEOEEEEEEEEOEDDEDEEEEDES 
: .WORD O sPOINTER USED TO ACCESS THE NEXT CELL IN QUE. 
BMPCQB:: .BLKW 64. sSTORAGE FOR 32 CELLS, TEST#® PLUS BMP CODE. 
BMPCQE: : sLAST ADDRESS PLUS 2 OF THE BMP CODE QUEUE. 


§ SFSSSSOSASSEAEEASEEESEESEAEEAEEEEEEEOEEEOSOOOOE4OEEEREEKEEKEEEOD4EEEEEEEEEEEEEEEE 


3 GENERAL TABLE AND BUFFER AREA--513 WORDS. 


§ SEMSSAEHEASASAESAESSHEAESESESACESRESSEAEEEDEEEEEEEODREEOEEEEEEEEEEERERERODESEEEE 


BUFBAS:: sBASE OF MEMORY BUFFER. 
ERLTBL:: .BLKW 128. sFIRST HALF OF GENERAL TABLE OR BUFFER. 
BUFMID: : -BLKW 64, ;SECOND HALF OF GENERAL TABLE OR BUFFER. 
BUF 3QT: : -BLKW 64. sLAST QUARTER OF THE BUFFER AREA. 
BUFEND: : sEND OF GENERAL PURPOSE MEMORY BUFFER. 
ENDETB: : .BLKW 16. sBUFFER OVERFLOW SPACE. 

ERRTBL 

LSERRTBL:: 

ERRTYP:: -WORD O 
ERRNBR: : -WORD O 
ERRMSG: : -WORD O 
ERRBLK: : .WORD O 


EVEN 


SEQ 44 
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-SBTTL GPR HANDLING ROUTINES FOR SUBROUTINE CALLS. 


5 FESEESEAEEEAEEEEAEEEEESEAEAEEEESEEAEEREEREEAEEAAEREEAEEAEREAEREAEREAEAEEEEEASS 


THERE ARE 4 ROUTINES AND MACRO DEFINITIONS USED FOR THE HANDLING OF 
GPR VALUES DURING SUBROUTINE CALLS WITHIN THIS PROGRAM. THE FOUR 
ROUTINES/MACRO CALLS HAVE THE FOLLOWING NAMES: 


SAVE - MACRO DEFINITION USED AT THE BEGINNING OF A SUBROUTINE TO 
SAVE THE GPR CONTENTS FOR LATER RESTORATION. 

PASS - MACRO DEFINITION USED AT THE END OF A SUBROUTINE TO RESTORE 
THE PREVIOUSLY SAVED GPR CONTENTS AND TO LEAVE THE CONTENTS 
OF THE SPECIFIED GPR(S) INTACT (NOT RESTORED). 

PREGOS - SUBROUTINE WHICH IS CALLED FROM THE SAVE AND PASS MACRO 
EXPANSIONS WHICH ACTUALLY PERFORMS THE ACTIONS ON THE GPRS. 


DURING A SUBROUTINE WHICH USES THESE GPR SAVE ROUTINES THE VALUES 
OF THE GPRS ARE STORED ON THE STACK IN THE FOLLOWING STACK FRAME: 


SP -> RET PC INTO PREGOS ROUTINE. 

SP+2 -> GPR RO CONTENTS. 

SP+4 -> GPR R1 CONTENTS. 

SP+6 -> GPR R2 CONTENTS. 

SP+8 -> GPR R3 CONTENTS. 

SP+10 -> GPR R4 CONTENTS. 

SP+1l2 -> GPR RS CONTENTS. 

SP+14 -> RET PC INTO CALLER OF SUB‘ TNE WHICH CALLED PREGOS. 


EACH LEVEL OF SUB’ TNE CALLING USES 8 WORDS OF STACK OVERHEAD. 

THE SAVE AND PASS MACROS CAN ALSO BE USED IN “STRAIGHT LINE CODE” 
TO SAVE AND RESTORE THE GPR VALUES. IN AMY CASE, AFTER THE 
ISSUING OF A PASS CALL THE GPRS WILL BE RESTORED TO THE VALUES 
THEY HAD PRIOR TO THE LAST SAVE CALL (EXCEPT FOR THE EXCEPTED, 

OR PASSED INTACT, GPRS SPECIFIED AS PARAMETERS TO THE PASS CALL) 
AND THE SP WILL ALSO BE RESTORED TO ITS CONDITION BEFORE THE LAST 
SAVE CALL. THE PROGRAMMER MUST BE SURE THAT THE SP HAS THE SAME 
VALUE WHEN THE PASS MACRO IS CALLED AS IT HAD IMMEDIATELY AFTER 
THE SAVE MACRO WAS CALLED. 


§ FPSASSESSSASASSEASSHEESASEASARASEREHERESSASASAAEASAKREEEEEHEDEEEERADRREEDEEERES EEE 


SEQ 35 


GER'PRAME ACUESS EouATES 


KS 
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.SBTTL GPR FRAME ACCESS EQUATES 
;*e¢ 
sEQUATES THAT ALLOW ACCESS TO THE STACK FRAME. THESE ARE THE 
s;OFFSETS INTO THE STACK FOR REGISTERS SAVED DURING THE PREGOS 


sROUTINE. 

pee 

LPCSLT== 36 ;OFFSET FOR LAST RETURN PC. 
PCSLOT== 16 ;OF FSET FOR RETURN PC. 
RSSLOT== 14 ;OF FSET FOR RS. 

R4SLOT== 12 ;OF FSET FOR R4. 

R3SLOT== 10 ;OF FSET FOR R3. 

R2SLOT == 6 ;OFFSET FOR Re. 

R1iSLOT== 4 sOF FSET FOR R1. 

ROSLOT== 2 ;OFFSET FOR RO. 


ZOHUBO DHU-11 F TST PARTI 
GLOBAL MACRO bEF IN TI 


ze 
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-SBTTL GLOBAL MACRO DEFINITION - SAVE - 

§ FESSSESEREEAEREREREREERESERESEEASERELAREREAAEEEEERERAAAEEEREREE EERE EAE REEEEES 
3:4 THIS MACRO IS USED AT THE BEGINNING OF A SUBROUTINE TO SAVE THE 

;* CONTENTS OF THE GPRS RO THRU RS. 

3% 

;* INPUTS: SP - UNCHANGED SINCE SUBROUTINE WAS ENTERED 

3% RSSLOT - OFFSET TO STACK SLOT FOR RS CEQUATED TO 14 OCTAL) 

3* 

;# OUTPUTS: GPR SAVE AREA ON THE STACK IS LOADED WITH THE CONTENTS OF GPRS 
;* TOP OF STACK - LOADED WITH THE RETURN ADDRESS INTO PREGOS 

3* F 

;* CALLING SEQUENCE: SAVE 

& 


a 

;* COMMENTS: NO ARGUMENTS ARE ALLOWED. 

3 * THE PASS MACRO SHOULD BE CALLED TO RESTORE THE GPR VALUES. 
;* 

;* SUBORDINATE ROUTINES CALLED: PREGOS. 


§ PREEAESASERESAAEAAEEASEERESEEREAERERASEEEBEEEEEEEEEAEEERAEEEEEEEESEOAEEEEEESES 


-MACRO SAVE 
-LIST 


-NLIST 
-ENDM SAVE 


JSR RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 


SEQ 37 


GLOBE HRCHO ber INE TION APT 


MS 
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-SBTTL GLOBAL MACRO DEFINITION - PASS - 
$ PEREBESELEBSESEESEEEBESEEEREEESERERELESEEAEEAEARESEEAEEEREEEEREAAAREREAEEEEDEES 
34 THIS MACRO IS USED IN CONJUNCTION WITH THE SAVE MACRO. IT IS 
;* CALLED AT END OF A SUBROUTINE TO PASS PARAMETERS IN GPRS BACK TO THE 
;* CALLING ROUTINE BY ALTERING THE GPR SAVE AREA ON THE STACK AND THEN 
pe RETURNING TO PREGOS TO RESTORE THE GPRS TO THEIR SAVED VALUES. 
3* 
;* INPUTS: ONLY ALLOWED ARGUMENTS ARE “RO” THRU “RS”. 
Lé ROSLOT THRU RSSLOT MUST BE EQUATED TO THEIR RESPECTIVE GPR SAVE 
:* SLOT OFFSETS BEFORE CALLING THIS MACRO. 
;* 
:*# OUTPUTS: THE GPR VALUES ARE PUT IN THEIR RESPECTIVE SLOTS ON THE STACK. 
3% 
;# CALLING SEQUENCE: PASS RO,R1,... 
3* 
;* COMMENTS: ANY COMBINATION OF GPR ARGUMENTS MAY BE LISTED IN ANY ORDER. 
3 FOR EXAMPLE, THE FOLLOWING ARE LEGAL: 
34 PASS R1 
3a PASS R4,RO,R2 
;* THE GPRS LISTED AS ARGUMENTS WILL BE PASSED INTACT TO THE 
;* CALLING ROUTINE, ALL OTHER GPRS WILL BE RESTORED. 
3% THE SP MUST BE AT ITS ORIGINAL VALUE WHEN PASS IS CALLED. 
34 
ey THE MACRO CALL 
;* PASS RO,R3 
34 EXPANDS INTO THE FOLLOWING ASSEMBLY CODE: 
3* MOV RO,ROSLOT( SP ) sPUT RO IN STACK SLOT. 
3% MOV R3,R3SLOTCSP) sPUT R3 IN STACK SLOT. 
3* JSR PC ,aCSP)-+ sRETURN TO PREGOS SUBRT. 
5m IN THIS EXAMPLE GPRS R1, R2, R4, AND RS WILL BE RESTORED TO 
3% THEIR VALUES CONTAINED IN THE STACK FRAME AND RO AND R3 
2a WILL BE LEFT AT THEIR VALUES PRIOR TO THIS PASS CALL. 
3% 


3* SUBORDINATE ROUTINES CALLED: (PREGRT - LABEL WITHIN PREGOS, VALUE ON STACK.) 


s SESSEAESERSEEASAASSEBASEASEEEEESABEOREREEHEDEDEKEEOEEEDEEOOEDEOOEEOEEODREDEEREEE 


MACRO 
. IRP 


PASS A.B,.C.0,E,F 


X,<A,B6,C,0,E,F> 
NB , X 
MOV X,X' SLOT( SP) sPUT X IN STACK SLOT. 
JSR PC,@(SP)-+ sRETURN TO PREGOS SUBRT. 
PASS 


58 
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-SBTTL GLOBAL SUBPOUTINE - PREGOS - 


§ FPSSESSESEESSEEEASESSEESSEABRALAAAEEESERASEAAREAEAEEEEAEAAAAEREAEEAEEAREEAEAEEEEEE EES 


;* PRESERVE REGISTERS RO THROUGH RS FOR SUBROUTINE CALLS. 


;* 

;# INPUTS: THE RETURN ADDRESS BACK INTO THE CALLING ROUTINE MUST BE IN 
‘s GPR RS. (I.E.- MACROS USE “JSR R5S,PREGOS”. ) 

;* 

;. OUTPUTS: REGISTERS RO THROUGH RS ARE SAVED ON THE STACK. 

S@CALLING SEQUENCE: sMACRO EXPANSION CALLS PREGOS. 

pe [SUBROUTINE CODE}... 

- PASS sMACRO EXPANSION RECALLS PREGOS. 

;* 

; *COMMENTS: THIS ROUTINE IS RE-ENTRANT. 

:4 PARAMETERS MAY BE PASSED OUT OF A SUBROUTINE BY MODIFYING THE 
we REGISTER SAVE AREA ON THE STACK. USE THE PASS GPRN MACRO 

: TO RETURN GPR VALUES INTACT 

2 USE THE RNSLOT OFFSETS FROM THE SP TO PASS OTHER PARAMETERS. 
- [EXAMPLE : MOV VALUE,ROSLOT(SP) 

> MAKE SURE THE SP IS AT ITS ORIGINAL VALUE WHEN YOU DO THIS. 


; # SUBORDINATE ROUTINES CALLED: NONE. 


§ SERASEAAEAAEEASELEERASEREREAEEERERAREERASAEEEEAEEEAEEASARERARERERAEREBARAEREREDRS 


PREGOS: sRS HAS BEEN LOADED ON THE STACK BY THE SUBROUTINE CALL 

MOV R4,-(SP) ;SAVE R4 ' 

MOV R3,-(SP) ;SAVE R3 

MOV R2, -(SP) ;SAVE R2 

MOV R1,-(SP) ;SAVE R1 

MOV RO, -(SP) :SAVE RO 

MOV R5,-(SP) ;PUSH RETURN PC ON TOP OF STACK 

MOV RSSLOT(SP),.RS  ;RESTORE RS TO VALUE IT HAD BEFORE CALLS 

JSR PC,a(SP)+ ;CALL THE SUBROUTINE AT THE RETURN ADDRESS 
sFROM THE PREGOS CALL, PUTTING THE PRESENT 
;PC_ON THE STACK AS A RETURN ADDRESS INTO 
;THIS (PREGOS) ROUTINE. 

gees 

;THE FOLLOWING CODE IS EXECUTED WHEN THE CALLING ROUTINE DOES 

SRETURN” [JSR PC,@(SP)+] USING THE PC DEPOSITED ON THE STACK ABOVE. 
5.2 
PREGRT:: MOV (SP)+,RS sPUT RETURN PC IN RS. 

MOV (SP )+,RO sRESTORE RO. 

MOV (SP)+,R1 ;RESTORE R1 

MOV (SP)+,Re sRESTORE R2 

MOV (SP)+,R3 ;RESTORE 

MOV (SP)+,R4 ;RESTORE R4, 

RTS RS ;RETURN TO THE SUBROUTINE WHICH CALLED PREGOS. 


sRESTORING RS IN THE PROCESS 


SE 


a 


64 
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GLOBAL TEXT SECTION 
1629 -SBTTL GLOBAL TEXT SECTION 
1637 
1638 
1639 see 
1640 ; THE GLOBAL TEXT SECTION CONTAINS FORMAT STATEMENTS, 
1641 s MESSAGES, AND ASCII INFORMATION THAT ARE USED IN 
1642 ; MORE THAN ONE TEST. 
1643 
1644 
1645 3 
ey, ; NAMES OF DEVICES SUPPORTED BY PROGRAM 
3 
1648 004036 DEVTYP <DHU-t1> 
004036 LSDOvTyYP:: 
004036 104 110 125 -ASCIZ /OMU-1LI1/ 
00404} 055 061 061 
004044 000 
-EVEN 
1649 
1655 
<—e s TEST DESCRIPTION 
3 
1658 004046 DESCRIPT <DHU-11 FUNC TST PART1> 
004046 L8SOESC:: 
ee, 004046 104 110 125 -ASCIZ /OrMU-11 FUNC TST PAR 
004051 055 061 061 
004 040 106 125 
004057 116 103 040 
124 123 124 
004065 040 120 101 
004070 122 124 061 
004073 000 
-EVEN 
1659 EVEN 
1660 


C4 
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1676 
1677 -NLIST BIN 
1678 
oe ; #eee¢eeeee FORMAT STATEMENTS USED IN PRINT CALLS eesececes 


1681 004074 EFOSO3:: .ASCIZ /sTsN/ 

1682 004101 EFOSOS:: .ASCIZ /sA SD58A ILLEGAL INTERRUPTS RECEIVED. sN/ 

1685 004154 EF1401:: .ASCIZ /sNSA ROM VERSION NUMBERS: PROC_1 = SD28A(D) PROC 2 = #D2s8A(D)SNV 
1684 004256 EF1402:: .ASCIZ /sTSA ROM VERSION NUMBER sTSN/ 

1685 0043135 EF1601:: .ASCIZ /SA STA. TEST ABORTED &N/ 

1686 004345 EF 1602:: .ASCIZ /#A ya Ne | DATA: S06S8A (0).8N/ 


. ASC AC SO6SA (0).SN/ 
1688 004451 EF1604:: .ASCIZ /SA BAD BIT(S) IN DEVICE STSA REGISTER FOR LINE SD28A (D).SN/ 
1689 004546 EF3001:: .ASCIZ /sA EXPECTED OR CORRECT VALUE: s03sN/ 
1690 004615 EF3002:: .ASCIZ /#A ACTUAL OR MEASURED VALUE: s03sN/ 
1691 004664 EF9006:: .ASCIZ /SA TSA SD2NACD )SN/ 
1692 004710 EF9010:: .ASCIZ /#A NUMBER OF ERRORS DETECTED ON LINE SD2s8A IS sDSSN/ 
1695 004777 EF9016:: .ASCIZ /SA UNEXPECTED STSA FOR LINE SD2SA(D) IN FIFO AFTER RESET: sN/ 
1694 005074 EF9017:: .ASCIZ /sA STSA (WITH ERROR FLAGS) IS SO068A(0)sN/ 
1695 005150 EF9016:: .ASCII /SA_ sTSA IN SELFTEST CODE FIFO SLOT FOR LINE sD2/ 
1696 005250 -ASCIZ /SA(D) AFTER RESET. SN/ 
1697 005255 EF9301:: .ASCIZ /SA STSD2SA(D), BMP CODE REPORTED :803s8A(0)sN/ 
1698 005535 EF9302:: .ASCIZ /SA OVERFLOW OCCURRED (MORE THAN 31 BMP CODES FOUND IN QUEUE )sN/ 
1699 005433 MFUNIT:: —_" /SNGA TESTING UNIT :8D46N/ 


1701 -LIST BIN 
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-NLIST BIN 


~~ 
oO 


wt. 


> 


NNN NNN NN “ew 
et art Ee en 
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Pe be be pee pepe pe 


NNN 
~ 
pee 


011463 


DROOMG:: .ASCIZ 
DRO2MG -ASCIZ 
DRO4MG:: .ASCIZ 
DRO6EMG -ASCIZ 
DOR1IOMG:: .ASCIZ 
DR1I2MG:: .ASCIZ 
OR14MG: : SsCcIZ 
DRI6MG:: .ASCIZ 
EMO0103:: .ASCIZ 
M0201 -ASCIZ 
EMO202:: .ASCIZ 
-ASCIZ 
EM0203:: .ASCIZ 
-ASCIZ 
EMO} -ASCIZ 
-ASCIZ 
EMO3501:: .ASCIZ 
EMO302:: .ASCIZ 
ASCIZ 
EMO303 -ASCIZ 
-ASCIZ 
EMO401:: .ASCIZ 
EMO402:: .ASCIZ / 
ASCIZ 
EMO5O01:: .ASCIZ 
EMOSO2:: .ASCIZ 
-ASCIZ 
EMOS25:: .ASCIZ 
EMO526 -ASCIZ 
EMO601 -ASCIZ 
EMO602 -ASCIZ 
-ASCI 
EMO603:: .ASCIZ 
-ASCIZ 7 
EMO701:: .ASCIZ 
EMO702:: .ASCIZ 
-ASCIZ 
EMO703:: .ASCIZ 
-ASCIZ / 
EMO601:: .ASCIZ 
EMO602:: .ASCIZ 
EMO901 -ASCIZ 
EMO0902 -ASCIZ 
EM1001 -ASCIZ 
EM1002:: .ASCIZ 
EM1003:: .ASCIZ 
EM1101:: .ASCIZ 
EM1201:: .ASCI 
EM1202:: .ASCIZ 
EM1203:: .ASCIZ 
EM1204:: .ASCIZ 


D4 
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seeeeeeses GLOBAL ERROR MESSAGES ecascecoseces 


FIFOSIZE. STAT/ 
/LNCTRL/ 
/TBUFFAD1I/ 
/TBUFFAD2/ 
/TBUFFCT/ 
/DEVICE REGISTER ACCESS ERRORS/ 
4 MASTER RESET TEST FAILED./ 
/ MASTER RESET BIT DID NOT “CLEAR AFTER BOARD RESET. / 
/ WAITED S SECONDS. BIT DEFECTIVE OR FIRMWARE HUNG./ 
4 MASTER RESET BIT CLEAR IMMEDIATELY AFTER BOARD RESET. / 
/ BIT DEFECTIVE OR BOARD FI ERROR. / 
\ WR BIT WENT CLEAR WITHIN 1/2 SECOND OF BOARD RESET.\ 
/ BIT DEFECTIVE OR SELFTEST WAS (INCORRECTLY) SKIPPED. / 
/MASTER RESET (SKIP SELFTEST) TEST FAILED. / 
/ WR BIT CLR WITHIN 10 a TECR AFTER ae RESET. / 
/ BIT DEFECTIVE OR BOARD FIRMWARE E 
\ MR BIT WENT CLEAR 1/75 TO S SECONDS AFTER “RESET. \ 
/ SELFTEST DID NOT GET SKIPPED (SHOULD HAVE BEEN SKIPPED). / 
——— REGISTER RX CHARACTER raEL® pees FAILED. / 
IMPROPER CODE FOUND IN RX FIFO AFTER DUT RESET./ 
/ EXPECTED: SELFTEST CODE, ACTUAL: IMPROPER CODE. / 
/RBUF REGISTER ERROR do FIELO TEST FAILED/ 
/ RX ERROR FLAG(S) F E 
/ EXPECTED: ALL ERROR FLAGS SET, ACTUAL: FLAG(S) CLEAR. / 
/ RX INTERRUPT(S) RECEIVED WITH Rx INTERRUPTS DISABLED. / 
/ TX INTERRUPT(S) RECEIVED WITH TX INTERRUPTS DISABLED. / 
CSR RX.DATA.AVAIL BIT TEST FAILED/ 
/ RX. DATA. AVAIL BIT FOUND CLEAR AFTER RESET COMPLETION. / 


Z/ EXPECTED BIT TO BE SET FROM SELFTEST CODES IN FIFO./ 


/ RX.DATA.AVAIL BIT COULD NOT BE CLEARED BY PURGING FIFO./ 
600 CHARS READ FROM FIFO WITHOUT R.D.A BIT CLEARING. / 

7RBUF RX.DATA.VALID BIT TEST FAILED/ 

/ RX.DATA.VALIO BIT FOUND CLEAR AFTER RESET COMPLETION./ 

/ EXPECTED BIT TO BE SET FROM SELFTEST CODES IN FIFO./ 

/ RX.OATA.VALID BIT COULD NOT BE CLEARED BY PURGING FIFO. / 
600 READ FROM FIFO WITHOUT R.D.V BIT CLEARING. / 

7RBUF RX.LINE.NUMBER FIELD TEST FAILED/ 

/ LINE NUMBER WRONG ON A SELFTEST CODE./ 

/CHECK FOR BMP_CODES TEST FAILED/ 

/UNEXPECTED BMP CODES FOUND. / 

/SKIP SELF-TEST TEST FAILED/ 

/ SKIP SELF-TEST TOOK TOO LONG TO COMPLETE > 50 MS./ 

/ SKIP SELF-TEST COMPLETED TOO SOON, < 10 MS./ 

/DIAGNOSTIC FAIL (SKP SELFTEST) TEST FAILED/ 









Z /SELF-TEST TEST FAILED/ 


/ SELF-TEST TOOK TOO LONG TO COMPLETE, » 5S SECONDS. / 
\ SELF-TEST COMPLETED TOO SOON, < 1/2 SECOND.\ 
/ SELF-TEST OID NOT EXECUTE/ 


SEQ 42 


E4 
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1767 011517 €M1205:: .ASCIZ “ DIAG_FAIL BIT BAD/ 

1768 011543 €M1301:: .ASCIZ /FAIL SELF-TEST TEST FAILED/ 

1769 011576 EM1302:: .ASCIZ / SELF-TEST ERROR REPORTING BAD/ 

1770 011635 EM1401:: .ASCIZ /ROM VERSION_NUMBER TEST FAILED/ 

1771 011674 €M1402:: .ASCIZ / FIFO EMPTY, ONE OR MORE ROM VERSION_NUMBERS MISSING/ 
1772 011762 A ah eats / ROM VERSION -.NUMBER FOUND OUT OF SEQUENCE/ 


1773 012035 EM1 $3 IZ / ONE OR MORE ROM VERSION_NUMBERS MISSING/ 
1774 012107 EM1405:: IZ / PROC _1/ 
1775 Ol12122 EM1406:: .ASCIZ / PROC _2/ 


1778 012155 €M1501:: .ASCIZ /CSR BIT 4 LY FAILED/ 
1779 012203 EM1502:: .ASCIZ /CSR BIT 4 B 


12 1 :: .ASC ED\ 
1762 012360 €M1701:: .ASCIZ \DEVICE REGISTER WORD READ/MODIFY/WRITE TEST FAILED\ 
1783 012443 E€M1801:: .ASCIZ \DEVICE REGISTER BYTE READ/WRITE TEST FAILED\ 
1784 012517 EM1901:: .ASCIZ \DEVICE REGISTER BYTE READ/MODIFY/WRITE TEST FAILED\ 
1785 012602 EM2001:: .ASCIZ /DEVICE STAT REGISTER ID BIT TEST FAILED/ 
1786 012652 EM2002:: .ASCIZ /ID BIT BAD. EXPECTED: SET, ACTUAL: CLEAR./ 
1787 012725 EM2301:: .ASCIZ /TX_ENABLE et BIT TEST FAILED 
1788 012772 EM2302:: .ASCIZ / TX_ENABLE BIT BAD ON L 
1789 013030 EM2401:: .ASCIZ /TX_ENABLE (ACTIVE) BIT Test * FAILED/ 
1790 013073 EM2601:: .ASCIZ /RECEIVE INTERRUPT TEST FAILED/ 
1791 013131 EM2602:: .ASCIZ 7 NO RX INT GENERATED (DATA_VALID SET, Rx INTS ENABLED). / 
1792 013222 EM2603:: .ASCIZ / NO RX INT GENERATED (NO CODES IN FIFO AFTER RESET)./ 
1793 013310 EM2604:: .ASCIZ / NO RX INT GENERATED (RX_DATA AVAIL CLR, RX INTS ENABLED)./ 
1794 013404 coe .ASCIZ / RX INTERRUPT ge Hh, RX_DATA AVAIL CLEAR. / 


1795 013467 EM2606:: .ASCIZ 7 TRANSMIT INTERRUPT TEST ERROR 
1796 013526 EM2607:: .ASCIZ / TX_ACTION SET REPEATEDLY AFTER BOARD RESET, NO DATA SENT. / 
1797 013622 € :: .ASCIZ / 1x -ACTION STUCK SET AFTER BOARD RESET. 

1798 013673 EM2609:: .ASCIZ / INTERRUPT GENERATED WITH TX_ACTION CLEAR. / 

1799 013752 EM2610:: .ASCI2Z2 / ‘o TX INTERRUPT WITH TX_ACTION SET AND TX INTS ENABLED./ 
1800 014044 EM2611:: .ASCIZ / TX_ACTION NOT SET AFTER CHARS SENT ON ALL LINES./ 

1801 014127 EM2612:: .ASCIZ 7 NO RX INT GENERATED CRX _DATA_AVAI!. SET, Rx INTS ENABLED). / 
1802 014223 EM3001:: .ASCIZ /INTERRUPT BR LEVEL TEST FAILEDZ 

1803 014262 :: .ASCIZ 7 NO RX_DATA_AVAIL FROM SELFTEST CODES IN FIFO AFTER RESET./ 
1804 014356 EM3003:: .ASCIZ / TX INTERRUPT GENERATED AT WRONG BR LEVEL:/ 

1805 014432 EM3004:: .ASCIZ / RX INTERRUPT GENERATED AT WRONG BR LEVEL: . 

1806 014506 EM :: .ASCIZ / TX INTERRUPT GIVEN PRECEDENCE OVER SIMULTANEOUS RX INT./ 
1807 014600 EM3101:: .ASCIZ /DIAGNOSTIC FIELD (BMP) TEST FAILED/ 

1606 014643 EM3102:: .ASCIZ / DIAGNOSTIC FIELD (BMP REQUEST) BAD ON LINE: / 

1809 014722 €M9014:: .ASCIZ /SUMMARY REPORTS FOR LINES WITH EXCESSIVE NUMBERS OF ERRORS: / 
1810 015016 €M9017:: .ASCII / FIFO WILL NOT PURGE one. _ VALID STUCK SET),/ 


1611 015073 -ASCIZ ak OF TEST SKIPPED 
18135 015137 €M9019:: .ASCIZ /NON-SELFTEST/ 


1818 015257 €M9301:: .ASCIZ /BMP CODES WERE tee aise THIS DOIAGNOSTIC/ 
1819 015336 EM9302:: .ASCIZ /BMP CODE FOUND IN TEST 

1820 015366 EM9303:: .ASCIZ /THE LAST BMP CODE WAS FOUND IN TEST / 

1621 015435 EM9304:: .ASCIZ /UNEXPECTED BMP CODES FOUND OURING THIS PASS/ 


1823 -LIST BIN 


F4 


F TST P MACRO M -MAR - 9: P 
EEREUBO | Diy bb TYNE ST PARTI CRO M1200 15 84 09:15 PAGE 38 SEQ 44 
2 
1834 -SBTTL GLOBAL ERROR REPORT SECTION 
He 
3°? 
1837 ; THE GLOBAL ERROR REPORT SECTION CONTAINS MESSAGE PRINTING AREAS 
1838 ; USED BY MORE THAN ONE TEST TO OUTPUT ADDITIONAL ERROR INFORMATION. PRINTB 
1839 ; (BASIC) AND PRINTX (EXTENDED) CALLS ARE USED TO CALL PRINT SERVICES. 


1840 g-- 


GCOBRE ERROR REPORTING. 


1866 


868 015514 


015520 
015524 


012746 


PART1 


ROUT INE 


015763 
000001 


000004 


G4 
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- EROIO1 - 
.SBTTL GLOBAL ERROR REPORTING ROUTINE - EROIOI - 
§ FERSESESEEEEESESESESELESEREEAESESESEEAEAEEEAEEAAAEABRERERERERERERERERERDREEESELS 
:¢ THIS IS AN ERROR REPORTING SUBROUTINE WHICH PRINTS ADDITIONAL ERROR 
34 INFORMATION IF AN ERROR IS DETECTED IN TEST 1 (REGISTER ADDRESS 
3+ ACCESS TEST). IF THE “EXTENDED ERROR INFO” OPTION HAS BEEN SELECTED 
34 THEN THIS SUBROUTINE WILL REPORT THE TYPE OF ACCESS (READ OR WRITE OR 
;* BOTH) WHICH CAUSED A BUS TIME-OUT TRAP (004 TRAP).A MESSAGE INDICATING 
3% THAT THE DHU MAY BE AT THE WRONG UNIBUS ADDRESS IS ALSO PRINTED. 
3* 
3* INPUTS: RS - ERROR FLAG WORD. 
34 IF BIT O IS SET, A READ ERROR OCCURED. 
34 IF BIT 1 IS SET, A WRITE ERROR OCCURED. 
3* 
;* OUTPUTS: MESSAGES ARE PRINTED AT THE OPERATOR CONSOLE. 
3% 
3# CALLING SEQUENCE: INCLUDE THE LABEL “ERO101” AS THE MESSAGE POINTER 
34 PARAMETER IN THE DRS ERROR REPORT MACRO CALL. 
3% 
:* COMMENTS: 
3% 
3# SUBORDINATE ROUTINES USED: NONE. 
§ SHSSESESESEEAASASESHEAERASALESSARERERELEAERAAEERESASEREDAEEEEEEEADRERAREDEEEEEEE 
BGNMSG ERO101 
EROLOL:: 
SAVE ;SAVE THE GPR CONTENTS. 
JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
MOV BITO6,RO sSET-UP THE BIT MAP FOR ‘REPORT EXT’D ERROR INFO’ 
BIC OPTION,RO sTRY AND CLEAR THE FLAG. 
BNE 6$ sEXIT IF OPTION NOT SELECTED. 
3* 
s REPORT EXTENDED ERROR INFOMATION 
‘ — 
BIT ®BITO,RS sTEST FOR READ ERROR. 
BEQ 2$ sSKIP READ ERROR MSG IF NO READ ERROR. 
PRINTB OMSG1 ;PRINT READ ERROR MESSAGE. 
MOV @MSG1,-(SP) 
MOV #1, -C€SP) 
MOV SP ,RO 
TRAP CSPNTB 
ADD @4,SP 
2s: BIT @BIT1,.RS sTEST FOR WRITE ERROR. 
as sSKIP WRITE ERROR MSG IF NO WRITE ERROR. 


BEQ 
PRINTB @#MSG2 sPRINT WRITE ERROR MESSAGE. 


MOV @MsGe, -CSP) 


MOV SP RO 
TRAP CSPNTB 
ADD 04 ,SP 
4$: PRINTX @MSG3 ;SUGGEST THAT DHU MAY BE AT WRONG ADDRESS. 

MOV #1, -(SP) 
MOV SP ,RO 
TRAP CSPNTX 
ADD o4,SP 


SEQ 45 
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1882 


1883 
0 


1684 
1885 


1886 


0 
1887 
0 


1888 
1889 


015622 
15622 


004736 


6$: 


MSG1:: 


MSGe: : 


MSG3:: 


PASS 
ENDMSG 


-ASCIZ /#ABUS TIME-OUT TRAP CAUSED BY WRITE ATTEMPT. sN/ 


-ASCIZ /#ADHU MAY BE AT THE WRONG UNIBUS ADDRESS. sNsN/ 


EVEN 


H4 


JSR 


sRESTORE THE GPR CONTENTS. 


PC,@(SP)>+ 


sRETURN TO PREGOS SUBRT. 


L1000e: 


TRAP 
-ASCIZ /#ABUS TIME-OUT TRAP CAUSED By READ ATTEMPT .«N/ 


C$MSG 


SEQ 446 


CZDHUBO DHU-11 FUNC TST PARTI 
GLOBAL ERROR REPORTING ROUTINE 


0 
1926 


1927 
1928 


1929 
1930 


016126 


016132 
016132 


016134 
016134 
016134 


010102 
105722 
001376 


010146 


104423 


165730 


000100 
164146 


004074 
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- ERO2O1 - 
-SBTTL GLOBAL ERROR REPORTING ROUTINE - ERO2ZOI - 
5 FESSSSSSSESAEESEESESESESSESSEEEAEAEESEADAEEAEEEESOAEEEEADAREREREEEDAEREREREREESS 
34 THIS IS AN ERROR REPORTING SUBROUTINE WHICH PRINTS 2 CONTIGUOUS 
34 ASCII ERROR MESSAGES. THE ADDRESS OF THE FIRST MESSAGE IS PASSED 
34 AS AN INPUT PARAMETER AND THE ADDRESS OF THE SECOND IS FOUND Br 
34 SEARCHING FOR THE END OF THE FIRST MESSAGE. THE MESSAGES ARE ONLY 
3 * PRINTED IF EXT’D ERROR REPORTING HAS BEEN REQUESTED. 
;* 
;* INPUTS: Ri - ADDRESS OF THE FIRST MESSAGE TO PRINT. 
7* 
;# OUTPUTS: A MESSAGES IS PRINTED AT THE OPERATOR CONSOLE. 
;* 
3* CALLING SEQUENCE: LOAD THE ADDRESS OF THE FIRST MESSAGE IN Rl. 
34 INCLUDE THE LABEL "“ERO201” AS THE MESSAGE POINTER 
3% PARAMETER IN THE DIAG SUPER ERROR REPORT MACRO CALL. 
3* 
;* COMMENTS: THE MESSAGE IS PRINTED AS BASIC ERROR INFORMATION. 
3* THE SECOND MESSAGE SHOULD FOLLOW THE FIRST ONE IN THE PROGRAM 
34 MEMORY. EACH MESSAGE SHOULD BE DEFINED USING .ASCIZ 
3% 
;# SUBORDINATE ROUTINES USED: NONE. 
§ SPEAAEESESEASESEEESESASAREEESESEEREREOEAEAEEEREEEREEEEEEEEEEEESEEEEREEAEEEES EEE 
BGNMSG ERO201 
ERO2O1L:: 
SAVE ;SAVE THE GPR CONTENTS. 
JSR RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 
MOV $B ITO6 RO sTRY TO CLEAR THE 
BIC OPTION,RO sEXT'D ERROR REPORTING FLAG 
BNE 4¢$ sEXIT IF FLAG NOT SET. 
MOV R1,R2 
es: TSTB C(R2)> ;CHECK FOR A ZERO BYTE CEND OF MESSAGE). 
BNE 2$ sLOOP UNTIL NEXT MESSAGE IS FOUND. 
PRINTB 9&€FO503,R1 sPRINT THE FIRST MESSAGE. 
MOV Rl, -€SP 
MOV e2, -(SP) 
MOV SP ,,RO 
TRAP CSPNTB 
ADD &6,SP 
PRINTB E€F0503,R2 sPRINT THE SECOND MESSAGE. 
MOV R2, -C SP) 
MOV SP RO 
TRAP CSsPNTB 
ADD #6, SP 
4$; PASS sRESTORE THE GPR CONTENTS. 
JSR PC ,acSP)-. sRETURN TO PREGOS SVUBRT. 
ENDMSG 
10003: 


TRAP Cs$MSG 


CZOHUBO DHU-11 FUNC TST PARTI 
GLOBAL ERROR REPORTING ROUTINE 


1959 
1960 


016172 
016172 
016172 


012700 
046700 
001011 


010146 


000100 
164056 


J4 
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- EROSOS - 


-SBTTL GLOBAL ERROR REPORTING ROUTINE - EROSOS - 


§ SSSSSASESERAESEESEEEAESREREREESESESHEEEREEEEEEEEEEAEREDEAEREEEREREERERREREEEEESS 


;* THIS IS AN ERROR REPORTING SUBROUTINE WHICH PRINTS AN ADDITIONAL ERROR 
;4 MESSAGE WHOSE ADDRESS IS PASSED AS AN INPUT PARAMETER, PROVIDED 

3:4 EXTENDED ERROR REPORTING HAS BEEN REQUESTED. 

5 

3;* INPUTS: Ri - ADDRESS OF THE MESSAGE TO PRINT. 

;* 

3# OUTPUTS: A MESSAGES IS PRINTED AT THE OPERATOR CONSOLE. 

3% 

3# CALLING SEQUENCE: LOAD THE ADDRESS OF THE MESSAGE IN R1. 

3:4 INCLUDE THE LABEL “EROSO3” AS THE MESSAGE POINTER 

3:4 PARAMETER IN THE DIAG SUPER ERROR REPORT MACRO CALL. 
3* 

3* COMMENTS: THE MESSAGE IS PRINTED AS BASIC ERROR INFORMATION. 


;* SUBORDINATE ROUTINES USED: NONE. 


§ FPAERAEEAEEELESAEESEEEEARESEEEREEAEEEAEEAEEEEEAEEEAEAEEEEEEEEEAERAESEEEEEERAEEDSS 


BGNMSG EROSO3 
EROSOS:: 


SEQ 45 


MOV @BITO6 ,RO ;TRY TO CLEAR THE 

BIC OPTION,RO ;EXT'D ERROR REPORTING FLAG 

BNE 2s sEXIT IF FLAG NOT SET. 

PRINTB @EFO503,R1 sPRINT THE MESSAGE. 
MOV R1,-CSP) 
MOV #2, -CSP) 
MOV SP RO 
TRAP CSPNTB 
ADD 96 ,SP 

2s: ENDMSG 
L10004;: 

FRAP CSMSG 


ca 


“ERROR REPORTING. 


1989 


1990 
1991 


016174 
016174 


016174 


016246 


016252 
016252 
016252 


010246 
012746 
012746 
010600 
104415 
062706 


104423 


PARTI 
ROUT INE 


K4 
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- EROSO4 - 
-SBTTL GLOBAL ERROR REPORTING ROUTINE - EROSOS - 
§ FESBERESESADEASEEEEEARESEEAEAEESEEEEESEEEEEAEAEEAEAREREEEEAEEEEEEEEAREREREEEEEEES 
;4 THIS IS AN ERROR REPORTING SUBROUTINE WHICH PRINTS ADDITIONAL ERROR 
3* MESSAGES WHEN ILLEGAL INTERRUPTS ARE RECEIVED. 
34 
;* INPUTS: Ril - ADDRESS OF THE MESSAGE TO PRINT. 
;* R2 - NUMBER OF ILLEGAL INTERRUPTS RECEIVED. 
3* 
:# OUTPUTS: MESSAGESS ARE PRINTED AT THE OPERATOR CONSOLE. 
3* 
3* CALLING SEQUENCE: LOAD THE ADDRESS OF THE MESSAGE IN R1. 
ja LOAD THE NUMBER OF ILLEGAL INTS IN Ro. 
34 INCLUDE THE LABEL “EROSO4” AS THE MESSAGE POINTER 
34 PARAMETER IN THE DIAG SUPER ERROR REPORT MACRO CALL. 
;* 
;* COMMENTS: 
3% 
;* SUBORDINATE ROUTINES USED: NONE. 
§ FPPSAREREEEEESESEEARESEREDREEREREEARASEEAEEEEEEABEEAEREREEESEEEEESEOREREREDEDE 
BGNMSG EROSO4 
EROSOS: : 
MOV #BITO6,RO ;TRY TO CLEAR THE 
BIC OPTION,RO sEXT‘O ERROR REPORTING FLAG 
BNE 2s ;EXIT IF FLAG NOT SET. 
PRINTB #E€FO503,R1 sPRINT THE FIRST LINE OF THE MESSAGE. 
MOV Ri, -( SP) 
MOV SEF O503, -( SP) 
MOV #2, -CSP) 
MOV SP ,RO 
TRAP CSPNTB 
%6,SP 
PRINTX #€FO505,R2 sPRINT THE NUMBER OF INTS RECEIVED. 
Vv R2, -CSP) 
MOV SP RO 
TRAP CSPNTX 
ADD #6, SP 
2s: ENOMSG 
L10005: 
TRAP CSMSG 


SEQ 49 


L4 
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GLOBAL ERROR REPORTING ROUTINE - ER1401 - 
1993 -SBTTL GLOBAL ERROR REPORTING ROUTINE - ER1401 - 
1994 § FPRSEESEEAEAEEEEESESERESERESERELESESESEREEAEADEEEEEDEREREREEEEDEEADEDREEDEEEDEDSS 
1995 34 THIS IS AN ERROR REPORTING SUBROUTINE WHICH PRINTS ADDITIONAL ERROR 
1996 34 INFORMATION CIF REQUESTED DURING THE SOF TWARE QUESTIONS) IF AN ERROR 
1997 3 IS DETECTED IN THE ROM VERSION TEST. THIS SUBROUTINE ANALYSES THE INPUT 
1998 34 PARAMETERS WHICH CONTAIN THE ROM VERSION NUMBERS FOR PROC_1 AND PROC 2 
phe 34 AND REPORTS THE APPROPRIATE ERROR MESSAGE TO THE OPERATOR. 
b 
2001 3;* INPUTS Ri - CONTAINS THE ADDRESS OF THE FIRST MESSAGE TO BE REPORTED. 
2002 , R3 - CONTAINS THE ROM VERSION NUMBER OF PROC _1. 
2008 34 R4 _ CONTAINS THE ROM VERSION NUMBER OF PROC 2. 
2 3% 
2005 3;# OUTPUTS: BASIC AND EXTENDED ERROR MESSAGES ARE REPORTED AT THE 
= 3* OPERATORS CONSOLE. 
3% 
2008 ;* CALLING SEQUENCE: INCLUDE THE LABEL “ER1401” AS THE MESSAGE POINTER 
oe 3% PARAMETER IN THE DRS ERROR REPORT MACRO CALL. 
10 34 
2011 3* COMMENTS: 
2012 ;* 
2013 ;# SUBORDINATE ROUTINES USED: NONE. 
2014 § PERSEAESEEASASEREAEERESEREEESEEARAEESEEEEAEKERAEREREEAEEEEEEEEEAEEEREREDEEEEESE 
2015 
2016 016254 BGNMSG ER1401 
one? 016254 ER1401:: 
2018 016254 012700 000100 MOV #BITO6,.RO sTRY TO CLEAR THE 
2019 016260 046700 163740 BIC OPTION,RO sEXT‘D ERROR REPORTING FLAG 
ooae 016264 001053 BNE 60$ sEXIT IF FLAG NOT SET. 
2022 016266 PRINTB #EFO503,.R1 sREPORT THE ERROR MESSAGE PASSED IN. 
016266 010146 MOV R1,-CSP) 
016270 012746 004074 MOV SEF OS03, -( SP) 
016274 012746 000002 MOV @2,-CSP) 
016300 010600 MOV ~RO 
016302 104414 TRAP CSPNTB 
016304 062706 000006 ADD $6 ,SP 
2023 
2024 - 
pos ; DETERMINE WHICH ROM VERSION NUMBER(S) ARE MISSING. 
2027 
2028 016310 012705 000143 MOV #99. .R5 ;GET INVALID ROM NUMBER. 
2029 016314 012701 012107 MOV #€M1405,R1 ;SELECT PROC_1 MESSAGE. 
2030 016320 012702 012135 MOV #EM1407 ,R2 sSELECT THE “NOT FOUND” MESSAGE. 
2031 016324 120305 CMPB R3,R5 ;CHECK PROC_1 ROM VERSION NUMBER. 
2032 016326 001402 BEQ 2s :GO REPORT PROC_1 CODE NOT FOUND. 
2033 016330 012702 012147 MOV 9EM1408 ,Re ;SELECT “FOUND" MESSAGE. 
pros 016334 904767 000026 2s: JSR PC 50% :GO REPORT MESSAGE. 
2036 016340 012701 012122 MOV 9EM1406 ,,R1 ;SELECT PROC_2 MESSAGE. 
2037 016344 012702 012135 MOV €£M1407 ,R2 ;SELECT THE “NOT FOUND” MESSAGE. 
2038 016350 120405 CMPB R4,RS ;CHECK PROC_2 ROM VERSION NUMBER. 
2039 016352 001402 BEQ 4$ ;GO REPORT PROC_2 CODE NOT FOUND. 
2040 016354 012702 012147 MOV 9EM1408 ,R2 ;SELECT “FOUND” MESSAGE. 
2041 016360 004767 000002 4$: JSR PC ,.50$ 3GO REPORT THE MESSAGE. 
2042 016364 000413 BR 60$ sEXIT. 
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3 
sOaa 016366 50$: PRINTX #EF1402,R1,R2 ;sREPORT THE MESSAGE. 
016366 010246 MOV RO, -CSP) 
016370 010146 MOV R1,-(SP) 
016372 012746 004256 MOV EF 1402, -( SP) 
016376 012746 000003 MOV 03,-CSP) 
016402 010600 MOV SP RO 
016404 104415 TRAP CSPNTX 
016406 062706 000010 ADD #10,SP 
2045 016412 000207 RTS PC ;RETURN,. 
2046 016414 60$: ENDMSG 
016414 L10006: 


016414 104423 TRAP C$MSG 


GCOBRE ERROR REPORTING. 


0 
2081 


0 
2082 


0 
2083 


016416 
016416 


016416 


016422 
016426 


016524 


012746 


PARTI 


ROUT INE 


000100 
163576 


002262 


004451 
000003 


-SBTTL GLOBAL ERROR REPORTING ROUTINE 
j FERABEEEREAEASEEEEEEEEEEREREEREDABEAEERERAEAEEAAAEDEREREREREEREEAREEAS 
THIS AN ERROR REPORTING SUBROUTINE WHICH PRINTS ADDITIONAL ERROR 
INFORMATION IF AN ERROR IS DETECTED IN ONE OF THE DEVICE REGISTER 
ACCESS TESTS, PROVIDED EXTENDED ERROR REPORTING HAS BEEN REQUESTED. 
THIS SUBROUTINE REPORTS THE ACTU 
REGISTER(S) WHICH ISCARE) IN FAULTY. 


Ri - ACTUAL DATA CUNUSED BITS SET TO 0). 


ee ee 


;* INPUTS: 


;# OUTPUTS: 


a 
;* COMMENTS: 


& 
;# CALLING SEQUENCE: 


N4 


MACRO M1200 _ 15-MAR-84 09:15 PAGE 44 
- ER1601 - 


- ER1601 - 


R2 - EXPECTED DATA CUNUSED BITS SET TO 0). 
RS - OFFSET CIN BYTES) TO THE REGISTER BEING TESTED. 
NE NUMBER OF REGISTER BEING TESTED 


RS - LI 
RMATBB - LABEL 


MESSAGES ARE PRINTED AT THE OPERATORS CONSOLE. 


3% 
;# SUBORDINATE ROUTINES CALLED: NONE 


§ SEASEESEEEEAEEEEAEREREREREAREAREEEBAEAEREEEAEEEEAEAREARAEEARERAEREEERAREEEREEEE 


BGNMSG 


MOV 
BIC 
BNE 


MOV 
PRINTB 


PRINTX 


PRINTX 


2$: ENOMSG 


ER1601 


#BITO6 ,RO 
aa 


RMATBBCR3),R4 
#EF 1604 ,R4,R5 


#EF 1602 ,R2 


#EF 1603,R1 


sTRY TO CLEAR THE 


ER1601:: 


sEXT‘D ERROR REPORTING FLAG 


sEXIT IF FLAG NOT SET. 


sFETCH ADDRESS OF REGISTER NAME MESSAGE. 
sREPORT BASIC MESSAGE (REG NAME AND LINE 
V 


;PRINT THE EXPECTED DATA. 


sPRINT THE ACTUAL DATA, 


1.10007: 


. AND EXPECTED FROM THE DEVICE 


AT BASE OF REGISTER MESSAGE ADDRESS TABLE. 


INCLUDE THE LABLE “ER1601" AS THE MESSAGE POINTER 
PARAMETER IN THE DRS ERROR REPORT MACRO CALL. 


SEQ 52 


ShAAGhhss 


#). 


ae FE weg 

BS 
CZ0MUBO DHU-11 FUNC TST PARTI MACRO M1200 15-MAR 84 09:15 PAGE 44-1 
GLOBAL ERROR REPORTING ROUTINE - ERI1601 - 


016524 104423 TRAP 


SEQ 5% 


C$MSG 


2085 


2108 


CZDHUBO DHU 11 FUNC TST PARTI 
GLOBAL ERROR REPORTING ROUTINE 


016616 


165244 


000100 
163462 


C5 


MACRO M1200 15-MAR-84 09:15 PAGE 45 
- ER1603 - — 
-SBTTL GLOBAL ERROR REPORTING ROUTINE - ER1603 - 
§ FOSS 69686 6F666666606666446066600600666000600004600066066606606 PROCESSES HEEHL DESEO EE 
34 THIS ERROR REPORTING ROUTINE IS USED TO PRINT OUT A BASIC ERROR 
3¢ MESSAGE, ALONG WITH A MESSAGE INFORMING THE OPERATOR WHICH TEST IS 
34 ABOUT TC BE ABORTED, PROVIDED EXTENDED ERROR INFOMATION HAS BEEN 
:* REQUESTED, OTHERWISE ONLY A “TEST FAILURE” MESSAGE WILL BE PRINTED. 
3 
3@ INPUTS: Ri - CONTAINS THE ADDRESS OF THE MESSAGE TO BE PRINTED. 
3¢ ERRMSG - CONTAINS THE ADDRESS OF THE MESSAGE THAT INDICATES 
74 THE TEST THAT IS BEING PERFORMED, EG OMA, BREAK ETC. 
34 
3@ OUTPUTS: MESSAGES ARE PRINTED AT THE OPERATORS CONSOLE. 
34 “TESTNAME TEST ABORTED” 
3¢ 
3@ CALLING SEQUENCE: INCLUDE THE LABLE “ER1603” AS THE MESSAGE POINTER 
76 PARAMETER IN THE DRS ERROR REPORT MACRO CALL. 
3% 
3* COMMENTS: 
3° 
34 
:* SUBORDINATE ROUTINES CALLED: NONE. 
§ SSSOSSSSHSSSSSSAEASEAEEOEEOHEEEEEEEEEEOHOEEEEEEEEEEEEEEEEEEESEEEEEEOEREEEEEEOSEES 
BGNMSG ER1603 
ER1603:: 
SAVE sSAVE THE CONTENTS OF THE GPRS. 
JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
MOV 6B ITO6 RO ;TRY TO CLEAR THE 
BIC OPTION,RO sEXT'D ERROR REPORTING FLAG 
BNE 2s sEXIT IF FLAG NOT SET. 
PRINTS @€FOSO3,.R1 sPRINT BASIC MESSAGE ON OPERATORS CONSOLE. 
MOV Ri, -€SP) 
MOV SEF OSOS, -( SP) 
MOV ee, -¢ 
MOV SP RO 
TRAP CsPNTB 
ADD &6,SP 
MOV ERRMSG ,R2 sGET THE “TEST MESSAGE”. 
PRINTB OE€F 1601 ,R2 sPRINT “TEST ABORTED” MESSAGE. — 
Vv e” 
MOV GEF 1601, -( SP) 
MOV e2, -¢ 
Vv »RO 
TRAP CSPNTB 
ADO 06, SP 
2s: PASS sRESTORE THE CONTENTS OF THE GPRS. 
JSR PC ,8¢SP)- sRETURN TO PREGOS SUBRT. 
ENDOMSG 
L10010: 
TRAP CSMSG 


0 
2152 
0 


0 
2153 
0 


2154 
2155 


016620 
016620 


016720 
016720 
016720 


012746 
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000100 
163374 
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SEQ 55 
.SBTTL GLOBAL ERROR REPORTING ROUTINE - ER35001 - 
§ PF SSSSSSHSSSOESESSESSEHASESSHESESOEHEESHAASEEEHEEESHEAEEEEEEEEEEEEEEEEEEREEOROEEESS 
3¢ THIS IS AN ERROR REPORTING SUBROUTINE WHICH IS INTENDED FOR USE IN THE 
3* INTERRUPT BR LEVEL TEST. IT REPORTS ADDITIONAL INFORMATION WHEN AN 
34 INTERRUPT HAS OCCURRED AT THE WRONG BR LEVEL. UNLESS EXTENDED ERROR 
3¢ REPORTING HAS BEEN REQUESTED, ONLY THE TEST FAIL MESSAGE 
34 BE PRINTED. 
;¢ 
3* INPUTS: R1 - ADORESS OF MESSAGE TO PRINT FIRST. 
5* R4 - BR LEVEL AT WHICH THE INT REQUEST OCCURRED. 
34 RS - EXPECTED OR CORRECT BR LEVEL FOR THE OUT. 
3% 
3* OUTPUTS: A MESSAGES IS PRINTED AT THE OPERATOR CONSOLE. 
3? 
3* CALLING SEQUENCE: INCLUDE THE LABEL "ER3001” AS THE MESSAGE POINTER 
34 PARAMETER IN THE DIAG SUPER ERROR REPORT MACRO CALL. 
3% 
:* COMMENTS: THE MESSAGE IS PRINTED AS BASIC AND EXTENDED ERROR INFORMATION. 
3% 
;* SUBORDINATE ROUTINES USED: NONE. 
FE SSOSAAASSSEEEEHEEEESAEASEHSSEEEEEEEEEHEAAEEEAEESEEEEAEDEEEEEEESEEEEOEEOEESEEESES 
BGNWISG ER3001 
ERSOOL:: 
MOV @BITO6 ,.RO ;TRY TO CLEAR THE 
BIC OPTION,RO sEXT'D ERROR REPORTING FLAG 
BNE 2s sEXIT IF FLAG NOT SET. 
PRINTB ¢€FO503,R1 ;PRINT THE FIRST LINE OF THE MESSAGE. 
MOV R1,-(SP 
MOV SEF O5SO3, -( SP) 
MOV 2. -¢ 
V SP ,RO 
TRAP CSPNTB 
ADD #6 ,SP 
PRINTX EF 3001,R5 sREPORT EXPECTED BR LEVEL. 
MOV RS, -€SP) 
MOV @EF S001, -( SP) 
MOV @2,-(SP) 
MOV RO 
TRAP CSPNTX 
ADD #6 ,SP 
PRINTX O€F 3002,R4 sREPORT ACTUAL BR LEVEL. 
MOV R4, -CSP) 
MOV SEF 5002, -( SP) 
MOV ®2, -(SP) 
MOV SP ,.RO 
TRAP CSPNTX 
ADD 96 ,SP 
2s: ENDMSG 
L10011: 
TRAP CSMSG 


a 
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GLOBAL ERROR REPORTING ROUTINE - ER9004 - 
2157 -SBTTL GLOBAL ERROR REPORTING ROUTINE - ER9OO4 - 
2158 i POSSE AESEEEEEESEEESESEEEAEEEASAEEREEEEAEDEEAEEE EREDAR EREAEEEDEEEDDEREDOSEEEEES 
2159 ;4 THIS IS AN ERROR REPORTING SUBROUTINE WHICH REPORTS ERROR SUMMARIES 
2160 i* FOR LINES WHICH HAVE EXCEEDED THE SPECIFIED MAXIMUM NUMBER OF 
2161 go . INDIVIDUAL RECEPTION ERRORS, PROVIDED EXTENDED ERROR REPORTING HAS 
ores i* BEEN REQUESTED BY THE OPERATOR. 
6 ® 
2164 3* INPUTS: Ri - ADDRESS OF MESSAGE TO PRINT FIRST. 
2165 3* ERCNTB - LABEL AT BASE OF LINE ERROR COUNTERS TABLE. 
ai46 34 ERSMRF - “REPORT ERROR SUMMARY FOR LINE” FLAGS. 
16 3; 
2i6e 3* OUTPUTS: A MESSAGE IS PRINTED AT THE OPERATOR CONSOLE. 
16 3% 
2170 3* CALLING SEQUENCE: INCLUDE THE LABEL “ER9004" AS THE MESSAGE POINTER 
ai73 ;* PARAMETER IN THE DIAG SUPER ERROR REPORT MACRO CALL. 
1 3% 
2175 ;* COMMENTS: THE MESSAGE IS PRINTED AS BASIC AND EXTENDED ERROR INFORMATION. 
5175 a THE CONTENTS OF GPR'S R2, R3, R&, AND RS ARE DESTROYED. 
3% 
2176 3* SUBORDINATE ROUTINES USED: NONE. 
2177 § SSSSASHASSEEASSASEAEAEEAEEASEEEEESEDEEEASEASEEEEAEEROREEEEEEEEEEEEEEDOEEEEDEESS 
2178 
2179 016722 BGNMSG ER9004 
016722 ER9004: : 
2180 016722 012700 000100 MOV SBITO6,RO sTRY TO CLEAR THE 
2181 016726 046700 163272 BIC OPTION,RO sEXT’'D ERROR REPORTING FLAG 
2182 016732 001040 BNE 6$ sEXIT IF FLAG NOT SET. 
2183 016734 PRINTB @E€FOS5S03,9EM9014 ;REPORT THE SECONDARY ERROR MESSAGE. 
016734 012746 014722 MOV SEM9014, -( SP) 
016740 012746 004074 MOV SEF OS03, -C SP) 
016744 012746 000002 MOV #2,-C(SP) 
016750 010600 MOV SP RO 
016752 104414 TRAP CSPNTB 
016754 062706 000006 ADD %6.SP 
2184 016760 005002 CLR R2 s;CLEAR THE LINE COUNTER. 
2185 016762 016703 163474 MOV ERSMARF RS sGET THE ERROR SUMMARY FLAGS. 
2186 016766 00 CLR R4 sCLEAR “LINE COUNTER TIMES 2” OFFSET. 
2187 016770 000241 2s; CLC sCLEAR THE CARRY FOR THE FOLLOWING ROTATE. 
2188 016772 006003 ROR RS sSHIFT ANOTHER ERROR SUMMARY FLAG INTO CARRY. 
2189 016774 103013 cc 43 3SKIP PRINTING MESSAGE IF FLAG FOR LINE CLEAR. 
2190 016776 PRINTX €F9010,R2,ERCNTB(R4) 
016776 016446 002464 MOV ERCNTBC(R4), -( SP) 
017002 010246 MOV R2,-(SP) 
017004 012746 004710 MOV SEF 9010, -(SP) 
017010 012746 000003 MOV @3,-CSP) 
017014 010600 MOV SP RO 
017016 104415 TRAP CSPNTx 
017020 062706 000010 #10,SP 
2191 017024 012405 4%: MOV CR4)+,RS sINCREMENT THE LINE OFFSET BY 2. 
2192 017026 005202 INC Re sINCREMT THE LINE COUNTER. 
2193 017030 005703 TST R3 sCHECK THE ERROR SUMMARY FLAGS. 
2194 017032 001356 BNE 2s sIF MORE FLAGS SET, LOOP TO DO OTHER LINES. 
2195 017034 6%: ENDMSG 
017034 L1001e: 
017034 104423 TRAP CsMSG 
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-SBTTL GLOBAL ERROR REPORTING ROUTINE - ER9OO7 - 
§ SSSSSSASERESESESEEEARESEAREEESEEEAAEEEESEAEEEEEAEEEEEREREEEEEDREREDEREEEEEDSEEES 
34 THIS IS AN ERROR REPORTING SUBROUTINE WHICH IS USED TO REPORT THAT 
3* SOMETHING OTHER THAN A SELFTEST CODE WAS FOUND IN A SELFTEST CODE 
;* FIFO SLOT DURING THE REMOVAL OF THE SELFTEST CODES FROM THE FIFO. 
34 THIS ROUTINE IS USED BY THE RSTRPT ROUTINE. EXTENDED ERROR INFOMATION 
;* IS GIVEN ONLY WHEN REQUESTED IN THE SOFTWARE QUESTIONS. 
3% 
;* INPUTS: R1 - ADDRESS OF ERROR MESSAGE QUALIFIER STRING. 
34 R2 - INCORRECT CODE AS READ FROM THE SELFTEST CODE FIFO SLOT. 
34 R3 - LINE NUMBER ASSOCIATED WITH THE SELFTEST FIFO SLOT. 
3% 
;# OUTPUTS: A MESSAGE IS PRINTED AT THE OPERATOR CONSOLE. 
3% 
:* CALLING SEQUENCE: INCLUDE THE LABEL “ER9007” AS THE MESSAGE POINTER 
34 PARAMETER IN THE DIAG SUPER ERROR REPORT MACRO CALL. 
3* 
3* COMMENTS: THE MESSAGE IS PRINTED AS BASIC AND EXTENDED ERROR INFORMATION. 
34 
3* SUBORDINATE ROUTINES USED: NONE. 
§ SCPSSSESSSAAEESESEEAAEAEARESEEEESAREREEEAEAAEEESEEAEEEEEEEREEEEEEREEEREEESEEEDS 
BGNMSG ER9007 
ER9007:: 
MOV &BITO6 ,RO ;TRY TO CLEAR THE 
BIC OPTION,RO sEX7'D ERROR REPORTING FLAG 
BNE 2$ sEXIT IF FLAG NOT SET. 
BIC #177760,R3 sREMOVE ALL BUT LINE @ BITS FROM LINE @ WORD. 
PRINTS #E€F9018,R1,R3 sREPORT SECONDARY ERROR MESSAGE. 
MOV R3,-CSP) 
MOV Ri, -¢ 
MOV SEF 9018, -( SP) 
MOV 63, -C 
MOV »RO 
TRAP CSPNTB 
#10,SP 
PRINTX #€F9017,R1,R2 sREPORT THE ACTUAL INCORRECT CODE. me. te) 
MOV R1. -(SP) 
MOV SEF 9017, -CSP) 
MOV e3, -(€SP) 
MOV SP RO 
TRAP CSPNTX 


2s: ENOMSG 
L10013: 
TRAP C$MSG 


SEQ 57 
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2231 -SBTTL GLOBAL ERROR REPORTING ROUTINE - ER900B - 
2232 § FPPESSSASEEAEAEEESESESEEADEERESESESEREEREAEAEEAEAEEEREDREREEREREREEAEEEEEEEESS 
2233 3@ THIS IS AN ERROR REPORTING SUBROUTINE WHICH IS USED TO REPORT THAT 
2234 ;* AN UNEXPECTED CODE OR CHARACTER HAS BEEN FOUND IN THE DUT RECEIVE 
2235 3% CHARACTER FIFO. THE ADDITIONAL ERROR IS REPORTED ONLY IF REQUESTED 
pty 34 DURING THE SOFTWARE QUESTIONS. 
3* 
2238 ;* INPUTS: R1 - ADDRESS OF PARTIAL ERROR MESSAGE STRING. 
am 34 R2 - INCORRECT CODE AS READ FROM THE SELFTEST CODE FIFO SLOT. 
3* 
oes :* OUTPUTS: A MESSAGE IS PRINTED AT THE OPERATOR CONSOLE. 
2 34 
2243 ;# CALLING SEQUENCE: INCLUDE THE LABEL “ER9008” AS THE MESSAGE POINTER 
sees 34 PARAMETER IN THE DIAG SUPER ERROR REPORT MACRO CALL. 
3% 
ease ;* COMMENTS: THE MESSAGE IS PRINTED AS BASIC AND EXTENDED ERROR INFORMATION. 
3* 
2248 :# SUBORDINATE ROUTINES USED: NONE. 
2249 § SSEASESEEEAAEEAEESEEAEDEAEEREAESEREDEEHAEAEEEEREEEEAEEREEAEREEEEEREEEEEADREEEEE 
2250 
2251 017126 BGNMSG ER9008 
25> 017126 ERSOOS: : 
2253 017126 012700 000100 MOV @BITO6,RO ;TRY TO CLEAR THE 
2254 017132 046700 163066 BIC OPTION,RO ;EXT'D ERROR REPORTING FLAG 
2255 017136 001030 BNE 2s sEXIT IF FLAG NOT SET. 
3* 
2258 ; EXTRACT THE LINE NUMBER FROM THE INCORRECT CODE OR CHARACTER WHICH WAS READ 
pe : FROM THE SELFTEST CODE FIFO SLOT. 
a° 
2261 017140 010203 MOV R2,R3 
2262 017142 000303 SWAB R3 
2263 017144 042703 177760 BIC #177760,R3 sCALCULATE LINE NUMBER OF CODE. 
2264 017150 PRINTB #EF9016,R1,R3 sREPORT TYPE OF INCORRECT CODE FOUND. 
017150 010346 MOV R3,-CSP) 
017152 010146 MOV R1,-CSP) 
017154 012746 004777 MOV SEF 9016, -C SP) 
017160 012746 000003 MOV @3,-CSP) 
017164 010600 MOV SP ,RO 
017166 104414 TRAP CSPNTB 
017170 062706 000010 ADD #10,SP 
2265 017174 PRINTX #@E€F9017,R1,R2 sREPORT THE ACTUAL INCORRECT CODE. 
017174 010246 MOV R2, -CSP) 
017176 010146 MOV R1,-CSP) 
017200 012746 005074 MOV EF 9017, -( SP) 
017204 012746 000003 MOV @3,-C(SP) 
017210 010600 MOV SP ,RO 
017212 104415 TRAP CSPNTX 
ones 017214 062706 000010 ADD #10,SP 
2267 017220 2s: ENDMSG 
017220 L10014; 


017220 104423 TRAP CsSMSG 
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- ER9101 - 


-SBTTL GLOBAL ERROR REPORTING ROUTINE - ER9101 - 


§ SPHSSESESESESEESEEEEEESALERERAEESRADEEADEAEAEEREEEEEAREREEEEREEEDEEDEEDEEDERELS 


34 THIS IS A GENERAL ERROR REPORTING SUBROUTINE WHICH REPORTS A MESSAGE 
34 WHICH TAKES A SINGLE, 2 DIGIT DECIMAL ARGUMENT AFTER THE END UF AN 
;* ASCII MESSAGE. 

* 

;*# INPUTS: Ri - VALUE TO BE PRINTED AFTER MSG AS 2 DECIMAL DIGITS. 


;* Re - ADDRESS OF MESSAGE TO PRINT FIRST. 

3* 

;# OUTPUTS: A MESSAGES IS PRINTED AT THE OPERATOR CONSOLE. 
* 


‘ 
;# CALLING SEQUENCE: INCLUDE THE LABEL "ER9101” AS THE MESSAGE POINTER 
34 PARAMETER IN THE DIAG SUPER ERROR REPORT MACRO CALL. 


3% 

;* COMMENTS: THE MESSAGE IS PRINTED AS BASIC ERROR INFORMATION. 
3% 

;* SUBORDINATE ROUTINES USED: NONE. 


§ SPREAHESERAEESEEEAAEEEASEEEEAEEEEEEEAAEREREEAEEEEEAEAEREREEEEAEEEEEOEEEREREEALS 


BGNMSG ER9S101 
ERSIOL:: 


MOV @BITO6,RO ;TRY TO CLEAR THE 
BIC OPTION,RO ;EXT'D ERROR REPORTING FLAG 
BNE 2s sEXIT IF FLAG NOT SET. 


PRINTB EF 9006,R2,R1 sREPORT THE STRING FOLLOWED By = NUMBER . 
V 


MOV #3,-CSP) 
MOV SP RO 
TRAP CSPNTB 
ADD #10.SP 
2s: ENDMSG 
L1O001L5: 
TRAP CSmMSG 


[5 


CZDHUBO DHU-11 FUNC TST PARTI MACRO M1200 15-MAR-84 09:15 PAGE 51 SEQ 69 
GLOBAL ERROR REPORTING ROUTINE - EROSO1 - 
e299 -SBTTL GLOBAL ERROR REPORTING ROUTINE - EROSO1 - 
2300 5 FESS SSESEASESESEESEAEESEAAEEEEEEEEEEREEEEEAEEEAEREAEREREAEEREREEEEAAEEEREEESS 
2301 34 THIS IS AN ERROR REPORTING SUBROUTINE WHICH PRINTS ANY BMP CODES 
2302 34 THAT ARE FOUND IN THE BMP CODE QUEUE, TOGETHER WITH THE THE NUMBER OF 
2303 34 THE TEST THAT WAS EXECUTING AT THE TIME THE BMP CODE wAS LOGGED. 
ooo. 3¢ PROVIDED EXTENDED ERROR REPORTING HAS BEEN ENABLED. 
34 
2306 ;* INPUTS: Rl - THE ADDRESS OF THE FIRST MESSAGE TO BE REPORTED. 
pod 34 R2 - THE ADDRESS OF THE NEXT EMPTY CELL IN THE QUEUE. 
3* 
2309 3;* OUTPUTS: THE TEST NUMBER FOLLOWED BY THE BMP CODE ARE PRINTED AT THE 
tay 34 OPERATOR CONSOLE. 
1 3% 
2312 ;# CALLING SEQUENCE: INCLUDE THE LABEL "ER9301” AS THE MESSAGE POINTER 
aote 3% PARAMETER IN THE DIAG SUPER ERROR REPORT MACRO CALL. 
1 3% 
oots ;* COMMENTS: THE MESSAGE IS PRINTED AS BASIC ERROR INFORMATION. 
3% 
2317 ;# SUBORDINATE ROUTINES USED: NONE. 
2318 § SESSA SEEESASESEEEEAEEEESEEAESEAEEADEEEROAEHESHEEEEEEESEEEEEEEEDESEEEEEEEEEEREDESE 
2319 
2320 017262 BGNMSG ER9301 
01726 ER9S301:: 
2321 017262 SAVE ;SAVE THE GPRS ON THE STACK. 
nee 017262 004567 164510 JSR RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 
2323 017266 012700 000100 MOV #BITO6,RO ;TRY TO CLEAR THE 
2324 017272 046700 162726 BIC OPTION,RO sEXT‘'D ERROR REPORTING FLAG 
oo 017276 001064 BNE 60$ sEXIT IF FLAG NOT SET. 
2327 017300 PRINTB #€FO503,R1 sREPORT UNEXPECTED BMP CODES FOUND. 
017300 010146 MOV R1,-CSP) 
017302 012746 004074 MOV EF O503, -( SP) 
017306 012746 000002 MOV 2,-CSP) 
017312 010600 MOV SP ,RO 
017314 104414 TRAP CSPNTB 
17316 062706 ADD #6, SP 
2328 017322 012703 002526 MOV BMPCOQB .R3 sGET THE START ADDRESS OF THE BMP CODE QUEUE. 
2329 017326 012705 015336 MOV E€M9302 ,R5 ;GET THE MESSAGE TO BE REPORTED. 
2330 017332 012301 2s: MOV (R3)+,R1 ;GET THE NUMBER OF THE TEST THAT WAS EXECUTING. 
2331 017334 012304 MOV CR3)+,R4 sGET BMP CODE THAT WAS REPORTED OFF THE QUEUE. 
2332 017336 004767 C00056 JSR PC ,50$ :;GO REPORT THE BMP CODE. 
2333 017342 020302 CMP R3,R2 ;CHECK IF ALL CODES HAVE BEEN REPORTED. 
ot 017344 103772 BLO 2$ sIF IT IS NOT THE LAST BMP CODE THEN LOOP. 
3* 
2336 ; CHECK IF OVERFLOW HAS OCCURRED. 
2337 ; THE CONDITIONS FOR OVERFLOW ARE: THE POINTER CONTAINS THE ADDRESS OF THE 
ates ; Last CELL IN THE QUEUE, AND A BMP CODE HAS ALREADY BEEN WRITTEN INTO THAT 
; i. 
2340 3 - 
2341 017346 020227 002722 CMP R2, OBMPCQE -4 sCHECK IF THE POINTER IS AT THE LAST LOCATION. 
2342 017352 001036 BNE 60$ sEXIT IF NOT AT THE LAST LOCATION. 
2343 017354 005762 000002 TST 2(R2) sCHECK FOR A BMP CODE IN THE LAST CELL 
2344 017360 001433 BEQ 60$ sEXIT IF NO OVERFLOW HAS OCCURED, CELL EMPTY. 
2345 017362 012301 MOV (R3)+,R1 ;GET THE TEST NUMBER OFF THE QUEUE. 
2346 017364 011304 MOV CR3),R4 ;GET THE BMP CODE OFF THE QUEUE. 
2347 017366 012705 015366 MOV #EM9303,R5 ;SELECT THE MESSAGE TO BE REPORTED. 
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GLOBAL ERROR REPORTING ROUTINE - ER9301 - 

2348 017372 PRINTX #EF9302 sREPORT OVERFLOW CONDITION. 
017372 012746 005333 MOV MEF S302, -( SP) 
017376 012746 000001 MOV #1, -CSP, 
017402 010600 MOV SP ,RO 
017404 104415 TRAP CSPNTX 
017406 062706 000004 ADD 94 ,SP 

2349 017412 004767 000002 JSR PC 50% sREPORT THE LAST BMP CODE PLACED ON THE QUEUE 

eons 017416 000414 BR 60$ sEXIT. 

2352 017420 50$: PRINTX #EF9301,R5,R1,R4 ;PRINT THE MESSAGE. 
017420 010446 MOV R4,-(SP) 
017422 010146 MOV R1,-(SP) 
017424 010546 MOV RS, -(SP) 
017426 012746 005255 MOV GEF 9301, -( SP) 
017432 012746 000004 MOV 04,-(SP) 
017436 010600 MOV SP ,RO 
017440 104415 TRAP CSPNTX 
017442 062706 000012 ADD #12,SP 

2353 017446 000207 RTS PC ;RETURN. 

2354 017450 60$: PASS sRESTORE THE GPR CONTENTS. 

osas 017450 004736 JSR PC ,acSP)-+ sRETURN TO PREGOS SUBRT. 

2356 017452 ENDMSG 
017452 L10016: 
017452 104423 TRAP C$MSG 
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CC BBA sPBRoOt INES seetDN = 

2358 -SBTTL GLOBAL SUBROUTINES SECTION 

2366 

2367 

2368 s+¢ 

2369 ; THE GLOBAL SUBROUTINES SECTION CONTAINS THE SUBROUTINES 

2370 ; THAT ARE USED IN MORE THAN ONE TEST. 


2371 a 
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SEG 6% 


-SBTTL GLOBAL SUBROUTINE - ALTFLD - 


3ee PESESAEEEEESEESEEEEEAEEESESEEEESAAEEREEEEEEEEREDEOEEEEEREEEAE EADS EADEEDEDESES 


34 - ALTER DEVICE REGISTER FIELDS ROUTINE - 

34 THIS SUBROUTINE ALTERS THE SPECIFIED FIELD OF THE SPECIFIED DEVICE 
34 REGISTER FOR THE SPECIFIED LINES. THIS ROUTINE CAN BE USED TO SET 
3* OR CLEAR BITS WITHIN SELECTED FIELDS OF SELECTED REGISTERS. 

34 USE EXAMPLES: SET RX.BAUD.RATE FIELDS ON LINES 3 AND 6. 

3% CLEAR TX.OMA BITS ON ALL LINES. 

3* 

;* INPUTS: Ril - ADDRESS OF THE REGISTERS TO ALTER. 

34 Re - BIT FIELDS SET TO DESIRED STATES. 

Lé R3 - BIT MAP OF LINES FOR WHICH TO ALTER REGISTER. 

34 R4 - MASK OF BITS TO ALTER (1 INDICATES CHANGE BIT). 

4 CSRA - CONTAINS THE ADDRESS OF THE DEVICE CSR. 

3% IESTAT - SAVED STATES OF THE INTERRUPT ENABLE BITS. 

;* 

;# OUTPUTS: DEVICE REGISTERS - SPECIFIED REGISTER FIELDS ALTERED. 


3* CSR IND.ADR.REG FIELD - DESTROYED. 

3% 

;* CALLING SEQUENCE: JSR PC,ALTFLO 

;* 

;* COMMENTS: THIS ROUTINE READS THE SPECIFIED REGISTERS FOR ALL LINES 

3 WITH NUMBERS LOWER THAN THE HIGHES SPECIFIED LINE. 

34 THIS ROUTINE DOES NOT READ THE CSR. 

;* 

;* SUBROUTINES CALLED: NONE. 

s-- SESSOEEESESSELESASEREEERESEREEEASERESASEESESESREASEAEEESEAEEKRERERERESEREREDSSE 


ALTFLD:: SAVE 3 SAVE —™ OF GPRS RO THRU RS. 


JSR RS, PRE ;CALL REGISTER SAVE SUBRT. 


; 
; SET UP TO LOOP FOR EACH LINE: 

; PREPARE THE WORD TO BE ORED INTO THE REGISTER CONTENTS. 

: SET UP THE WORD TO WRITE INTO THE IND.ADR.REG FIELD OF THE CSR. 
3 


MOV R4 ,RO sCALCULATE THE NEW CONTENTS OF THE 

COM RO : REGISTER FIELDS WHICH ARE TO BE 

BIC RO ,R2 ; ALTERRED BY THIS ROUTINE. 

MOV IESTAT,.RS 3sSET UP TO WRITE IND.ADR.REG FIELD TO 0. 


3° : 

; LOOP ONCE FOR EACH LINE, ALTERING THE SPECIFIED FIELD IN THE SPECIFIED 
: REGISTER IF THE LINE HAS BEEN SELECTED FOR ALTERING. | 

; EXIT THE LOOP IF NO MORE LINES TO ALTER, OR IF WE HAVE ALTERED THE MAX 
i ALLOWABLE NUMBER OF LINES CAS SPECIFIED BY NUMLNS). 


* 
CLC sPREPARE FOR ROTATE, “TST RS” DOES THIS BELOW. 
2s: ROR R3 NE 


. 0. 
sSET DUT CSR IND.ADR.REG FIELD TO THIS LINE 


MOV (R1),RO sGET THE PRESENT CONTENTS OF THE REG TO ALTER. 
BIC R4,RO s;CLEAR THE BIT FIELDS WE ARE TO ALTER, 
BIS R2,RO ;OR IN THE NEW STATES OF THE FIELDS. 
MOV RO,(R1) sWRITE THE NEW REGISTER CONTENTS TO THE REG. 
4$: INC RS ;SET LINE NUMBER TO THE NEXT LINE. 
TST R3 sCHECK FOR UNHANDLED LINES, CLEAR CARRY FLAG. 
BNE 2s sLOOP IF SELECTED LINECS) IS NOT HANDLED. 


M5 
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GC BBP PB Robt ne hay th ak ae EG 64 
2429 
2430 017522 60$: PASS sRESTORE GPRS. 
017522 004736 JSR PC ,aCSP)-+ ;sRETURN TO PREGOS SUBRT. 


2431 017524 000207 RTS PC sRETURN TO CALLING ROUTNE. 
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162572 


-SBTTL GLOBAL SUBROUTINE - CALMSL - 


s+ SEREERESLAEEEAEEELEDESASSEREAESARASEREREEEAREAEREREAERREREAEEEAEDAEEREEEEESS 


34 - CALIBRATE MILLI SECOND LOOP COUNT SUBROUTINE - 

;4 THIS SUBROUTINE CALIBRATES THE TIMING LOOP WHICH IS USED IN THE MSLOOP 
:# ROUTINE. THIS SUBROUTINE CALCULATES A VALUE FOR THE MSLCNT VARIABLE 
34 WHICH IS THE NUMBER OF SOFTWARE LOOPS WHICH TAKES 1 MS TO EXECUTE IN 
54 THE MSLOOP ROUTINE. THIS ROUTINE CALIBRATES THE COUNT BY USING THE 

;* LINE TIME CLOCK (LTC), SO IF NO LTC IS AVAILABLE THE LEFAULT VALUE FOR 
;* THE DELAY COUNT MUST BE USED. 

;* 

34 

;* INPUTS: MSLCNT - DEFAULT 1 MS DELAY LOOP COUNT VALUE, OR 


;4 VALUE FROM PREVIOUS CALIBRATION. 


34 MSTICK - NUMBER OF MS PER LTC CLOCK TICK. 
7 TIMER1 - TIMER COUNTER CHANGED BY LTC INTERRUPT SERVICE RIN. 
;* CLKHRZ - NUMBER OF LTC CLICKS PER SECOND (50 OR 60). 
;* 
;* OUTPUTS: CARRY - SET IF LTC IS AVAILABLE, AND NEW CALIBRATION PERFORMED. 
34 MSLCNT - NEW 1 MS DELAY LOOP COUNT VALUE IF LTC AVAILABLE, OR 
;* UNCHANGED IF NO LTC IS AVAILABLE. 
3% 
:# CALLING SEQUENCE: JSR PC ,CALMSL 
3% 
; COMMENTS: 
;* 
;# SUBORDINATE ROUTINES CALLED: UNSDIV,OOPS. 
$-- SERSESEEEEEESESSEHEEEEEREEAERASEREARAREREROEREREREEEEOREREEREREEREREEEREEESES 
CALMSL:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 
CLR 62$ ;CLEAR THE 2ND TIME FLAG. 
36 
; SYNCHRONIZE WITH THE LTC. 
= 
2s: MOV #1,R5 3SET OUTER LOOP COUNTER TO 1 LOOP. 
s INCREASE THE VALUE LOADED INTO THIS COUNTER IF THE <es 
sFOLLOWING LOOP FAILS ON FUTURE, FASTER PROCESSORS. <«es 
CLR RO ;CLEAR THE WAIT FOR CLOCK INT COUNTER. 
MOV #1, TIMER1 3SET UP COUNT OF 1 TO SYNCH WITH LTC. 
4$; TST TIMER1 sCHECK FOR COUNTER HAVING GONE TO ZERO. 
BEQ 6$ ;JUMP OUT OF LOOP IF LTC HAS INTERRUPTED. 
INC RO sCOUNT THIS ITERATION OF THE INNER LOOP. 
BNE As ;LOOP IF COUNTER HAS NOT TURNED OVER. 
DEC RS sDECREMENT THE INNER LOOP COUNTER. 
BGT 4$ sLOOP IF OUTER LOOP COUNT NOT UP. 


3* 
; IF WE GOT NO LTC INTERRUPT, INDICATE THAT THERE IS NO LTC AVAILABLE. 
; LTC MUST BE FLAKEY, OR NOT REALLY AN LTC AT ALL. 


;* 
CLR CLKHRZ sCLEAR LTC FREQUENCY WORD TO INDICATE NO LTC. 
CLC s INDICATE FAILURE FOR RETURN. 
BR 60$ sBYPASS THE FOLLOWING CALIBRATION PROCEDURES. 


; WE ARE NOW SYNCHRONIZED WITH THE LTC. 
; SET UP FOR THE CALIBRATION LOOP. 


63: MOV OTIMER1,R4 ;WILL TEST TIMER1 IN THE LOOP BELOw. 


SEG 


bo 
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GfopAL SU GROUT INE - CALMSL - 
2489 017604 005001 CLR Ri sCLEAR THE OUTER LOOP COUNTER. 
2490 017606 005002 CLR Re sINDICATE TO CHECK ALL BLIS OF TIMER. 
2491 017610 005003 CLR R3 sINDICATE TO CHECK FOR TIMERI CLEAR. 
oat 017612 012714 000001 MOV #1,(R4) sLOAD TIMER1 WITH COUNT OF 1. 
2494 017616 016705 162534 8s: MOV MSLCNT,RS sLOAD MS LOOP COUNT 
2495 017622 011400 10$: MOV (R4),RO sGET THE TIMER1 VALUE. 
2496 017624 010067 000120 MOV RO, sSAVE WORD (LIKE IN THE REAL LOOP). 
2497 017630 040200 BIC R2,.RO sLEAVE ALL THE BITS. 
2498 017632 020005 CMP RO,RS sCOMPARE AGAINST ZERO. 
2499 017634 000261 SEC sSET CARRY IN CASE OF SUCCESS. 
2500 017636 001406 BEG l2$ sEXIT LOOP IF TIMER1 HAS CLEARED. 
2501 017640 DEC RS sCOUNT DOWN THE INSIDE MS LOOP COUNT. 
2502 017642 001367 108 sLOOP IF MS NOT UP. 
2503 017644 301 DEC R1 sDECREMENT THE MS TIME COUNT. 
2504 017646 001363 BNE 8$ sKEEP LOOPING. 
oane 017650 004767 000440 JSR PC OOPS sWE OVERFLOWED, SOMETHING IS WRONG, ABORT. 
3° 
2507 s WE HAVE NOW HAVE LOOP COUNT INFORMATION FOR ONE CLOCK TICK. 
2508 ; WE HAVE NEGATIVE OF NUMBER OF OUTER LOOPS IN R1, EACH IS fg gd INNER LOOPS. 
2509 3 WE HAVE THE PORTION OF THE LAST OUTER LOOP NOT EXECUTED, IN RS 
tay s NOW WE CALCULATE THE TOTAL NUMBER OF INNER LOOPS EXECUTED. 
3 - 
2512 017654 1 12s NEG Ri sGET NUMBER OF OUTER LOOPS. 
2513 017656 016702 162474 MOV MSLCNT ,R2 :GET THE NUMBER OF INNER LOOPS PER OUTER LOOP. 
2514 017662 010203 MOV RS sCOPY NUMBER OF LOOPS FOR MULTIPLY 
2515 017664 160502 SUB RS ,R2 — © OF oo ke LOOPS DONE IN LAST OUTER LOOP 
2516 017666 010204 MOV R2,R4 AND ADD TO ACCUMULATOR LSWORD. 
2517 017670 005005 CLR RS SCLEAR ACCUMULATOR MSWORD. 
2518 017672 00530 148; DEC R1 sCHECK R1 FOR O C T 
2519 017674 100403 BMI 16% s SKIP MULTIPLICATION IF ZERO 
2520 017676 060 ADD R3,R4 sMULTIPLY NUMBER OF 
2521 017700 005 ADC S s LOOPS PER OUTER LOOP By 
cose 017702 000773 BR 14% sNUMBER OF OUTER LOOPS PERFORMED. 
3° 
aes s DIVIDE THE TOTAL NUMBER OF INNER LOOPS BY THE NUMBER OF MS PER LIC TICK. 
i _ 
2 017704 016701 162444 168; MOV MSTICK,R1 :@ OF MS PER LTC TICK IS DIVISOR. 
2527 017710 010403 MOV R4,RS sLSWORD OF LOOP COUNT IS LSWORD OF DIVIDEND. 
2528 017712 010502 MOV »R2 sMSWORD OF LOOP COUNT IS MSWORD OF DIVIDEND. 
2529 017714 004767 003140 JSR PC ,UNSDIv :DIVIOE NUMBER OF LOOPS BY MS PER LTC TICK. 
2530 017720 103402 Bcs 4 sBYPASS OOPS IF WE'RE Ox. 
2551 017722 004767 000366 JSR PC .00PS sCLOCK ROUTINES ARE NOT LONG ENOUGH, OR BUG. 
25 17726 010167 162424 18%; MOV Ri. MSLCNT sSET NEW VALUE FOR MS LOOP COUNT. 
25353 017732 005167 000010 COM 625 sSET THE 2ND ITERATION FLAGS IF 1ST ITERATION. 
2534 017736 001277 BNE es sBRANCH IF ONLY ONE ITERATION DONE. 
ity 017740 000261 SEC sSET THE SUCCESS FLAG FOR EXIT. 
2537 017742 603; PASS sRESTORE GPRS, 
017742 004736 JSR OC SP )> sRETURN TO “"EGOS SUBR’. 
ite 017744 000207 RTS PC : CARRY - SUCCESS FLAG. SET - TA. << 
2540 017746 000000 62%: -WORD O s2ND CALIBRATION ITERATION FLAGS. 
2541 017750 000000 64%: -WORD 0 sDUMMy WORD FOR STORAGE OF THE READ WORD. 


i 
Sit BROUTI 


017752 


' 


UNC TST PARTI 


= 


004567 
005067 
011011 
005767 
000261 
001401 
000241 


004736 
000207 


164020 
162336 


162330 


Co 
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- CKTRAP - 


-SBTTL GLOBAL SUBROUTINE 


§ PPSOSSOOEEESOSESESESESEEEEEOASEEDSOEEEEEEEEEEOEOEEEREREEDEDEOEOEEEEEREEEEEEEEES 
CHECK TRAP ROUTINE - 
THIS SUBROUTINE IS USED TO CHECK FOR A BUS TIME-OUT TRAP (004 TRAP) 


:* OUTPUTS: 


3@ CALLING SEQUENCE: 
COMMENTS: 


CKTRAP:: SAVE 
CLR 
MOV 
ADRPTR:: TST 


608: 


WHICH IS CAUSED BY AN ACCESS TO A NON-EXISTENT 
IF THE TRAP DOES NOT OCCUR, THIS 


INPUTS: 


- CKTRAP - 


MEMORY OR 1/0 LOCATION. 
ROUTINE RETURNS A SUCCESS INDICATION. 


RO - SOURCE ADDRESS FOR MOVE. 
Ri - DESTINATION ADDRESS FOR MOVE. 
CRO) - SOURCE FOR THE MOVE. 


(R1) - WRITTEN TO THE CONTENTS OF (RO). 
CARRY FLAG - SET ON RETURN IF NO 004 TRAP DETECTED. 
TP4FLG - NONZERO IF TRAP OCCURRED, CLEARED OTHERWISE. 


JSR 


PC ,CKTRAP 


IF THIS SUBROUTINE CAUSES A TRAP, EITHER THE ADORESS wHICH 
TS LABELED ADRPTR WILL BE THE TRAP PC ADDRESS ON THE STACK. 


3* SUBORDINATE ROUTINES CALLEO: NONE. 


3 206606466666 SCOSOHSHSSSESHEOESESEEHAEHEEEESEHESAEESEEEEEEEEEEEEEEEHEEEEOEEEEEEEEES 


TP4FLG 
CRO).CR1) 
TP4FLG 


608% 


JSR 
PC 


sSAVE CONTENTS OF GPRS RO THRU RS. 

RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
;CLEAR THE 004 TRAP FLAGS. 

sPERFORM THE MOVE IN QUESTION. 

sCHECK FOR OCCURENCE OF TRAP. 

sINDICATE SUCCESS. 

sEXIT WITH SUCCESS IF TRAP DID NOT OCCUR. 
s INDICATE FAILURE. 

sRESTORE GPRS. 

PC .aCSP)- 


sRETURN TO PREGOS SUBRT. 


SEQ 67 


Ce BEBO Pil od+ 1 Kec TST PARTI 


004567 


004767 
103002 


004 767 


004736 
000207 


163770 


001344 


000522 


D6 
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-SBTTL GLOBAL SUBROUTINE - CLNRST - 

§ PESESSESESESSESSEEESEEESEDESODEDADEESAEEAEESEAREEEAEAAEAEEEEEEDEEDEEEDAEEEEEOESS 
;¢ - CLEAN RESET OF THE DEVICE UNDER TEST - 

;* THIS SUBROUTINE IS USED TO RESET THE DUT TO A KNOWN STATE. 

34 a IS SKIPPED,AND THE FIFO IS PURGED OF ANY ERROR 
3* ‘ . 

34 IF THE RESET DOES NOT SUCCESFULLY COMPLETE, THEN THE CARRY BIT IS 
3¢ PASSED BACK TO THE CALLING ROUTINE (CLEAR). 

34 

;* INPUTS: CSRA - CONTAINS THE ADDRESS OF THE CSR 

34 TXBFCA - CONTAINS ADDRESS OF DUT DMA BUFFER COUNT REGISTER. 
34 ERRNBR - ERROR NUMBER FOR POSSIBLE ERROR REPORT. 

34 ERRTBL- ERRTYP,ERNBR,AND ERRMSG SET UP CORRECTLY. 

32 

s@ OUTPUTS: THE DUT PERFORMS ITS RESET FUNCTION INTO A KNOWN STATE. 

34 CARRY - CLEAR INDICATES THE TEST IS TO BE ABORTED. 

34 ERRBLK - VALUE MAY BE DESTROYED. 

34 IESTAT - TX AND RX INTERRUPT FLAGS ARE CLEARED. 

34 TX AND RX INTERRUPT ENABLE BITS IN THE DUT'S CSR ARE CLEARED. 
3% 

3# CALLING SEQUENCE: JSR PC,CLNRST 

32 

;# COMMENTS: THIS SUBROUTINE CAN REPORT ERRORS WITH NUMBERS ERRNBR. 


3% THIS ROUTINE DOES NOT DESTROY THE VALUE OF ERRNBR. 
& 
3* SUBORDINATE ROUTINES CALLED: DELAY,MSLGET,PUFIFO,RESETT. 


§ SSSSSSHSSHSSSASSEALEESEEOHOESESESALESESESEEEASESEEESERESEEEAEREEESERAEEEEOEEEEEDE 


CLNRST:: SAVE sSAVE CONTENTS OF GPRS RO THRU 
RS, PREGOS 


RS. 
JSR ;CALL REGISTER SAVE SUBRT. 


3¢ 
; RESET THE OuT. 
; THIS ROUTINE REPORTS ERRORS WITH NUMBERS FROM ERRNGR THRU ERRNBR-2. 


JSR PC ,RESETT sRESET THE DUT TO A KNOWN STATE. 
BCC 608 sEXIT ROUTINE WITH ABORT TEST INDICATOR. 


3* 
; PURGE THE FIFO OF ERROR CODES, SAVE ANY BMP CODES FOUND. 
5 * 
JSR PC ,PUF IFO sPURGE THE FIFO. 
sEXIT THE TEST USING RESETT OR PUFIFO STATUS. 


PASS sRESTORE GPRS, PASS THE FOLLOWING INTACT: 
JSR PC,@(SP)-> sRETURN TO PREGOS SUBRT. 
see we sCARRY BIT: IF CLEAR, THEN ABORT THE TEST. 


SE Q 6A 


E6 
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GLOBAL St PBROU - CLR1I6W - 

2621 -SBTTL GLOBAL SUBROUTINE - CLR1I6W - 

2622 3e6 aS ORIN SNS HANAE SR ONES eS Sees anak essen soos besoneseseesesoosenssnscssonesonss 

2623 ;* CLEAR SIXTEEN WORDS ROUTINE - 

os . THIS SUBROUTINE CLEARS 16 WORDS STARTING WITH THE SPECIFIED WORD. 

567 ‘* INPUTS: RO - ADDRESS OF THE FIRST WORD TO CLEAR. 

5609 is OUTPUTS: CRO) TO CRO+15) - 16 WORDS OF MEMORY ARE CLEARED TO Oo. 

try ‘ CALLING SEQUENCE : JSR PC,CLR16W 

pee i COMMENTS: 

2634 e SUBORDINATE ROUTINES CALLED: NONE. 

2635 g-- SAEAAEEOREDEEEESERSSERALEEEREEAADEODEDDOEREDDEDEERERERERDEEOREEESEEREADEOSS 

2636 

2637 020024 CLRi6W:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 

020024 004567 163746 JSR RS , PREGOS sCALL REGISTER SAVE SUBRT. 

2638 020030 012701 000020 MOV #16. ,R1 :SET THE LOOP COUNTER TO 16. 

2639 020034 005020 2s: CLR CRO)-+ sCLEAR A WORD OF MEMORY. 

2640 020036 005301 | DEC R1 sCOUNT THIS LOOP. 

2641 020040 001375 BNE 2s sLOOP IF NOT 16 WORD CLEARED. 

2642 020042 60$: PASS sRESTORE GPRS. 

020042 004736 JSR PC ,.a(SP)-+ sRETURN TO PREGOS SUBRT. 


2643 020044 000207 RTS PC 


GEBGHE°SPaobtrhANe TST PAR 


020122 


163724 


002464 


002464 
1621352 


162124 


002410 162344 


F6 
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-SBTTL GLORAL SUBROUTINE - CNTERR - 


3¢*¢ SESSEEERESESEEREEESESESEAESEEEREEEEEAAEREEAEEEEAEEEEEODEREREEEREADEDEEESEEDEEES 


T - COUNT ERROR ROUTINE - 

34 THIS SUBROUTINE IS USED TO COUNT A “DATA” ERROR ON THE SPECIFIED 

;¢ LINE. IT CHECKS WHETHER ERROR SUMMARY REPORTING IS ACTIVE, OR SHOULD 
34 BE MADE ACTIVE ON THIS LINE, AND ACTIVATES IT IF NECESSARY. 

;* 

;* INPUTS: RS - LINE NUMBER OF LINE UNDER CONSIDERATION. 

5¢ ERCNTB - LABEL AT BASE OF ERROR COUNTERS TABLE. 

3% ERSMRF - ERROR SUMMARY FLAGS (BIT SET IF LINE IN SUMMARY MODE). 
34 NDERPT - NUMBER OF INDIVIDUAL DATA ERRORS TO REPORT ON A LINE. 
3% 

;@ OUTPUTS: CARRY - SET IF LINE IS IN ERROR SUMMARY MODE. 

34 ERCNT - ERROR COUNTER INCREMENTED FOR SPECIFIED LINE. 

34 ERSMRF - BIT SET IF LINE SHOULD BE IN SUMMARY MODE. 

3% 

3* CALLING SEQUENCE: JSR PC .CNTERR 

3° 

;* COMMENTS: 

34 

3* SUBORDINATE ROUTINES CALLED: NONE. 

g-- SESEEESSEOEEEAEAESESEREEESASASHEEEEEEOAEEEEADEOEEEEEEEDEEEEEEEEEEEEDEEEEEEEEE 


;SAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS .PREGOS ;CALL REGISTER SAVE SUBRT. 
a 


; COUNT THE ERROR ON THE COUNTER FOR THE SPECIFIED LINE. 
a 


CNTERR:: SAVE 


ASL RS sFORM WORD OFFSET FROM LINE NUMBER. 
MOV ERCNTBC(RS),.R1 ;GET THE PRESENT ERROR COUNT FOR THIS LINE. 
INC R1 sCOUNT ERROR. 
Bcs 2s sOVERFLOW? YES, DON’T UPDATE COUNTER IN TABLE. 
MOV R1, ERCNTBC(RS) sUPDATE ERROR COUNTER TABLE ENTRY. 
2s: TST NDERPT 
BEQ 60% sSUMMARYS DISABLED? YES, EXIT WITH CARRY O. 
CMP R1,NDERPT sNO, CHECK FOR ENOUGH ERRORS FOR SUMMARY USE. 
BHI 43 sENOUGH ERRORS TO USE SUMMARY? YES, GO HANDLE. 
CLC s INDICATE NOT TO USE SUMMARY REPORT YET. 
BR 60$ sEXIT WITH CARRY O. 
4$: BIS BITTBLC( RS), ERSMRE ;SET THE ERROR SUMMARY FLAG FOR LINE. 
SEC s INDICATE TO USE SUMMARY REPORT. 
603: PASS sRESTORE GPRS. 
or a JSR PC .Q(SP)- sRETURN TO PREGOS SUBRT. 


SEG 70 


SEBGHP°PeRobHafeN® TST PART 


020124 


0 
020160 
020162 


004567 
010401 
012702 
005003 
012704 
004767 
103002 
004767 


004736 
000207 


177777 


163646 
177777 


020162 
000130 


000136 


G6 
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- LAY - 


-SBTTL GLOBAL SUBROUTINE 


§ PPRSSESEREBEEAEESEEEEEEEEEAEEEEESAEESEREREEEEEEAAEEREAEEEEEEEEREDEEAEAEEEDAEES 


3% 
;* 


THIS SUBROUTINE IS USED TO DELAY A 


3# INPUTS: 


3% OUTPUIS: 
3* CALLING SEQUENCE: 


IF NO HARDWARE CLOCK INTERRUPTS ARE ge et CONTROL -CS WILL 
NOT BE HONORED FOR THE DURATION OF THE DELA 


* 
;* COMMENTS: 


- DELAY - 


- DELAY ag ager EE iy - 
VARIABLE NUMBER OF MILLI-SECONDS. 


R4 - CONTAINS THE NUMBER OF MS TO DELAY. 
MSLCNT. 


NONE . 


JSR 


PC ,DELAY 


é 
3* SUBORDINATE ROUTINES CALLED: NONE. 


§ SHEESH AEEEEESEEEEAEEEAEEAEAEEASEAEEAEEAEDAEREEREREREREREREERER ERAS 


DELAY:: 


60$: 


SAVE 


JSR 


: SAVE —s OF GPRS RO THRU RS. 

RS ,PREGO sCALL REGISTER SAVE SUBRT. 
:PASS NUMBER OF MS DELAY AS TIME-OUT VALUE. 
;TELL MSLOOP ROUTINE TO CHECK ALL BITS. 

;TELL MSLOOP RTN TO CHECK FOR ALL BITS CLEAR. 
;TELL MSLOOP TO CHECK DUMMY NON-ZERO WORD. 
sDELAY THE REQUESTED @ OF MS. 

sEXIT ROUTINE IF WE TIMED-OUT. ] 

:IF NO TIME-OUT, BAD PROGRAM OR HOST MACHINE. 
sRESTORE GPRS. 
PC ,@(SP)+ 


sDUMMY, NON-ZERO WORD. 


sRETURN TO PREGOS SUBRT. 


SEQ 71 


020164 
020164 


020170 
020172 


020174 


020212 
020214 


004567 


GEBHMP?Puodt eMC TST PART 


163606 


000070 


H6 
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-SBTTL GLOBAL SUBROUTINE - MSLGET - 


i PERSE SSEEEESESEESEEEEEEADESEEESEEADEAAEEEESEAEEAEAAEREDEAEEEADEAEADEREEREREDESE 


34 - MILLI SECONDS LOOP WHICH RETURNS READ WORD AND REMAINING TIME - 

5 * THIS SUBROUTINE IS A GENERAL PURPOSE TEST LOOP SUBROUTINE. IT IS USED 
34 TO VERIFY THAT A CERTAIN ACTION OCCURS BEFORE A TIME-OUT PERIOD. THE 
34 CALLING ROUTINE PASSES IN WHICH BITS SHOULD BE SET AND CLEARED FOR THE 
;* DESIRED CONDITION AND THE TIME-OUT VALUE IN MILLI-SECONDS. 

34 THIS ROUTINE CHECKS FOR THE DESIRED CONDITION UPON ENTRANCE INTO THE 
34 ROUTINE AND THEN ONCE EACH MILLI-SECOND THERE AFTER. 

34 UPON RETURN, THE LAST WORD WHICH WAS READ TO CHECK FOR THE CONDITION 
3% IS RETURNED BY THIS SUBROUTINE. 

;* 

;# INPUTS: Ril - TIME-OUT VALUE IN MILLI-SECONDS (UP TO 64K MS). 

34 Re - BIT MAP OF BITS TO TEST (1 INDICATES TO TEST THE BIT). 

34 RS - DESIRED STATES OF THE INDICATED FIELDS IN Re. 

3a R4 - ADDRESS OF THE WORD TO TEST. 

34 MSLCNT - MILLI SECOND SOFTWARE LOOP COUNT. 

3* 

;# OUTPUTS: RO - THE LAST WORD WHICH WAS READ TO CHECK FOR THE CONDITION. 
;* Ri - REMAINING NUMBER OF MS IN TIME-OUT TIME. 

34 CARRY - SUCCESS FLAG (SET IF CONDITION IS MET BEFORE TIME-OUT). 


% 
3# CALLING SEQUENCE: JSR PC .MSLGET 


3% 

;* COMMENTS: THIS ROUTINE WORKS WITH OR WITHOUT A HARDWARE CLOCK, BUT THE 
Hi CALIBRATION IS GNLY GUARENTEED WHEN A LINE CLOCK IS AVAILABLE 
3* ON THE SYSTEM. 

34 THIS ROUTINE CAN BE USED AS A DELAY ROUTINE, BY SPECIFYING THE 
3* DESIRED DELAY AS THE TIME-OUT AND SPECIFYING A CONDITION TO 

;* LOOK FOR WHICH WILL NOT BE MET DURING THE DELAY. 

34 IF A_TIME-OUT VALUE OF O IS SPECIFIED, THIS ROUTINE CHECKS FOR 
fe THE DESIRED CONDITION BEFORE RETURNING. IT INDICATES SUCCESS 
34 IF THE CONDITION IS MET, FAILURE OTHERWISE. 

3% 


% 
3 SUBORDINATE ROUTINES CALLED: NONE. 


$ SES SSOSESESSESEEOEDEEEEEHEOEE4O4O84646004600064644646048084600000040044060006000000800004 


MSLGET:: SAVE 3SAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS .PREGOS ;CALL REGISTER SAVE SUBRT. 
3 * 


; SET UP MASK FOR REMOVING UNUSED BITS IN THE TEST WORD, AND CLEAR UNUSED 
; BITS IN THE DESIRED STATE WORD TO ALLOW DIRECT COMPARISON. 


at COM R2 ;GET MASK OF UNUSED BITS. 
BIC R2,R3 sMASK OUT UNUSED BITS IN DESIRED STATE WORD. 


3* 
; HANOLE THE TEST AND EXIT IF WE HAVE A O TIME-OUT VALUE. 
. 


TST R1 sTEST THE TIME-OUT VALUE FOR ZERO. 

BNE es sIF NON-ZERO TIME-OUT, GO LOOP AND TEST. 
MOV (R4),RO sGET THE WORD TO TEST BEFORE EXITING. 
MOV RO ,62$ sSAVE VALUE SO WE CAN RETURN IT. 

BIC R2,RO sMASK OUT UNTESTED BITS OF WORD. 

CMP RO,R3 ;COMPARE AGAINST DESIRED STATE WORD. 


SEC s INDICATE SUCCESS IN CASE WORDS ARE EQUAL. 
BEQ 6$ sEXIT WITH SUCCESS IF WORDS ARE EQUAL. 


SEQ 72 


SEBERP°SPMabt KN TST PART 


2775 
2776 


020216 
020220 


020272 


020274 


020276 


000241 
000416 


016705 
011400 


162130 
000042 


000014 
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CLC 
BR 6$ 
3 ¢ 
; NON-ZERO TIME-OUT VALUE. 
2s: MOV MSLCNT,RS 
4$: MOV (R4),RO 
MOV RO,62$ 
BIC R2,RO 
CMP RO,R3 
SEC 
BEQ 6$ 
DEC RS 
BNE as 
DEC Ri 
BNE 2s 
CLC 


s INDICATE FAILURE (TIME -OUT). 
sEXIT WITH FAILURE, WORDS AREN'T EQUAL. 


LOOP, WAITING FOR CONDITION OR TIME-OUT. 


;LOAD MS LOOP COUNT. 

;GET THE WORD TO TEST. 

sSAVE WORD IN CASE THIS IS THE LAST. 
sMASK OUT UNTESTED BITS OF WORD. 
;sCOMPARE AGAINST DESIRED STATE WORD. 
;SET CARR’ IN CASE OF SUCCESS. 

;EXIT WITH SUCCESS IF WORDS ARE EQUAL. 
sCOUNT DOWN THE INSIDE MS LOOP COUNT. 
;LO00P IF MS NOT UP. 

;DECREMENT THE MS TIME COUNT. 

;IF TIME NOT UP, LOOP TO COUNT ANOTHER MS. 
;CLEAR CARRY, WE TIMED-OUT. 


; HAVE EITHER FOUND CONDITION, OR TIMED-OUT (POSSIBLY FROM O TIME-OUT VALUE). 


; RESTORE THE LAST CONTENTS READ FROM THE TEST WORD. 


6$: 


MOV 62$ ,RO 
60$: PASS RO,R1 
MOV 
MOV 
JSR 
RTS PC 
3* 
; LOCAL STORAGE. 
- 
625: -WORD O 


EXIT ROUTINE. 


sPASS OUT THE LAST READ WORD. 
sRESTORE GPRS, EXCEPT THE FOLLOWING: 


RO,ROSLOT( SP) sPUT RO IN STACK SLOT. 
R1,R1SLOTC(SP) sPUT R1 IN STACK SLOT. 
PC ,a(SP)-+ sRETURN TO PREGOS SUBRT. 


sRO - LAST READ WORD CHECKED FOR CONDITION. 
sR1 - REMAINING TIME (O IF TIME-OUT OCCURED). 
sCARRY - SET IF SUCCESS, CLEAR IF TIME-OUT. 


;STORAGE FOR THE LAST READ WORD. 


SEQ 7% 


J6 
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GLOBAL Si‘BROUTINE - MSLOOP - 
2806 -SBTTL GLOBAL SUBROUTINE - MSLOOP - 
2807 § PERSE EEEEEEEERERSEAEEEAEAEEEEESEEEEBREEEEAAEEEAEEAEEEEREREEAREAEAEREEEEESEEDS 
2808 34 - TEST LOOP SUBROUTINE - 
2809 ;* THIS SUBROUTINE IS A GENERAL PURPOSE TEST LOOP SUBROUTINE. I1 IS USED 
2810 34 TO VERIFY THAT A CERTAIN ACTION OCCURS BEFORE A TIME-OUT PERIOC. THE 
2611 3% CALLING ROUTINE PASSES IN WHICH BITS SHOULD BE SET AND CLEARED FOR THE 
2812 ;* DESIRED CONDITION AND THE TIME-OUT VALUE IN MILLI-SECONDS. 
2813 ;* THIS ROUTINE CHECKS FOR THE DESIRED CONDITION UPON ENTRANCE INTO THE 
ty 34 ROUTINE AND THEN ONCE EACH MILLI-SECOND THEREAFTER. 
1 ;* 
2816 ;* INPUTS: Ri - TIME-OUT VALUE IN MILLI-SECONDS (UP TO 64K MS). 
2817 34 Re - BIT MAP OF BITS TO TEST (1 INDICATES TO TEST THE BIT). 
2618 3% RS - DESIRED STATES OF THE INDICATED FIELDS IN Ro. 
2819 ;* R4 - ADDRESS OF THE WORD TO TEST. 
sty ;* MSLCNT - MILLI SECOND SOFTWARE LOOP COUNT. 
1 ;* 
pre ;# OUTPUTS: CARRY - SUCCESS FLAG (SET IF CONDITION IS MET BEFORE TIME -OUT). 
3% 
or. ;* CALLING SEQUENCE: JSR PC .MSLOOP 
34 
2826 ;* COMMENTS: THIS ROUTINE WORKS WITH OR WITHOUT A HARDWARE CLOCK, BUT THE 
2827 34 CALIBRATION IS ONLY GUARENTEED WHEN A LINE CLOCK IS AVAILABLE 
2828 3* ON THE SYSTEM. 
2829 3% THIS ROUTINE CAN BE USED AS A DELAY ROUTINE, BY SPECIFYING THE 
2830 34 DESIRED DELAY AS THE TIME-OUT AND SPECIFYING A CONDITION TO 
2831 34 LOOK FOR WHICH WILL NOT BE MET DURING THE DELAY. 
2832 34 If A TIME-OUT VALUE OF O IS SPECIFIED, THIS ROUTINE CHECKS FOR 
2833 34 THE DESIRED CONDITION BEFORE RETURNING. IT INDICATES SUCCESS 
ote 3@ IF THE CONDITION IS MET, FAILURE OTHERWISE. 
3* . 
2836 3# SUBORDINATE ROUTINES CALLED: MSLGET. 
2837 § PORSEASEEHSLESEEASESEHESEESEAEADEEEEECAESHEEEDEEOEEEEOOO84E44EEOEEEEEEEEEEEEDS 
2838 
2839 020300 MSLOOP:: SAVE ;SAVE CONTENTS OF GPRS RO THRU RS. 
eso 020300 004567 163472 JSR RS .PREGOS sCALL REGISTER SAVE SUBRT. 
2841 3° 
2842 ; CALLING THE MSLGET ROUTINE FROM THE MSLOOP ROUTINE ISOLATES THE CALLER OF 
iaae ; MSLOOP FROM THE RETURNED TEST WORD AND REMAINING TIME-OUT VALUES. 
i= 
oar 020304 004767 177654 JSR PC .MSLGET sCALL THE MULTI-PURPOSE MS LOOP AND SEARCH RTN. 
2847 020310 60$: PASS sRESTORE GPRS, 
020310 004736 JSR PC.a@(SP)- sRETURN TO PREGOS SUBRT. 


2348 020312 000207 RTS PC sCARRY - SET IF SUCCESS, CLEAR IF TIME-OUT. 


KO 
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GC Bak sPaRodt NEN - OOPS - eS 
2850 -SBTTL GLOBAL SUBROUTINE - OOPS - 
2851 3 ¢ SESSLER ESEEEEESEESESESELESAEREREERAEAEEEEAEEEEEREEEEEEEEEDAEERAEAEDEEDS 
2852 34 - PROGRAM ABORT SUBROUTINE. - 
2853 ;* THIS SUBROUTINE IS USED TO ABORT THE PROGRAM WHEN A FATAL ERROR IS 
2854 34 DETECTED IN THE PROGRAM OR THE HOST SYSTEM HARDWARE. AN ERROR MESSAGE 
oa ;* IS PRINTED GIVING SOME INFORMATION ABOUT THE NATURE OF THE ABORT. 
3* 
pod ;* INPUTS: Ril - ERROR CODE GIVING REASON FOR ABORT. 
2 34 
2859 3;# OUTPUTS: AN ERROR MESSAGE IS PRINTED. 
2860 34 A LIST OF RETURN PC VALUES FOR ALL SUBROUTINE CALLS IS PRINTED. 
2861 34 
= ;# CALLING SEQUENCE: JSR PC.OOPS 
6 ;* 
2864 ;* COMMENTS: 
2865 ;* 
2866 ;* SUBORDINATE ROUTINES CALLED: NONE. 
2867 F-~- SRESASHEEEAEEAEEAERARASESEAEREEAEEAEEAEEESEAESEEEAEEAEAEEEEEEEDREEREESEDRERAESE 
2868 
2869 020314 OOPS:: SAVE ;SAVE CONTENTS OF GPRS RO THRU RS. 
020314 004567 163456 JSR RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 
2870 ; REPORT “HOST COMPUTER HARDWARE OR SOFTWARE BUG ENCOUNTERED. ” ERROR. 
2871 020320 ERRSF 101,EM0101 
0203520 104454 TRAP CSERSF 
020322 000145 . WORD 101 
020324 020360 . WORD EMO101 
020326 000000 . WORD 0 
2872 ; REPORT “PROGRAM HUNG, WAITING FOR A CONTROL-C. ” 
2873 020330 PRINTF #—€M0102 
020330 012746 020444 MOV 9EM0102, -( SP) 
020334 012746 000001 MOV #1,-CSP) 
020340 Ol MOV SP ,.RO 
020342 104417 TRAP CSPNTF 
20344 062706 000004 ADD 34 ,SP 
2874 020350 2s: BREAK sLOOK FOR OPERATOR CONTROL-C INPUT. 
20350 104422 TRAP CSBRK 
2875 020352 000776 BR es ; INFINITE LOOP. 
2876 020354 605: PASS ;DON'T NEED THIS, BUT SOMEBODY MAY CHANGE THIS 
20354 004736 JSR PC ,.aCSP)>» ;sRETURN TO PREGOS SUBRT. 
= a 020356 000207 RTS PC ; ROUTINE IN THE FUTURE, SO BE CONSISTANT. 
2879 020360 110 117 123 EMO101:: .ASCIZ /HOST COMPUTER HARDWARE OR SOFTWARE BUG ENCOUNTERED. / 
020363 124 040 103 
020 117 115 120 
020371 125 124 105 
020374 122 040 110 
020377 101 122 104 
020402 127 101 122 
020405 105 040 117 
020410 122 040 123 
020413 117 106 124 
020416 127 101 122 
020421 105 040 102 
020424 125 107 040 
020427 105 116 103 
020432 117 125 116 
020435 124 105 122 
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GLOBAL. S\BROUT INE 


2880 


2881 


104 


L6 
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- OOPS - 


EMO102:: .ASCIZ /sSNSAPROGRAM HUNG, WAITING FOR A CONTROL -C. <e¢es4004000664668NSN/ 


.EVEN 


SEQ 74 


EEBERPOPeobhisune TST Paar 


020542 
020542 
020546 
020552 


020570 


020572 
020576 
00 


004567 
012701 
016704 


011402 
100016 


004736 
000207 


070000 


000301 


001470 


M6 
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-SBTTL GLOBAL SUBROUTINE - PUFIFO - 


§ FPSASOSEEEBESESESSEESELEESSESESEEASEEEEEBELEREAEEREEEEEEEEAREEERAREEADERAEDEAAAE ESS 


34 - PURGE THE FIFO 


54 THIS ROUTINE TRIES TO REMOVE ALL THE CHARACTERS FROM THE FIFO. 

34 ANY BMP CODES THAT ARE FOUND ARE SAVED ON THE BMP CODE QUEUE. 

;* 

> INPUTS: RBUFA- CONTAINS THE ADDRESS OF THE RECEIVER. 

= OUTPUTS: CARRY BIT - INDICATES THE STATE OF THE FIFO, SET:= PURGED. 
“ BMPCQ - THE CONTENTS OF THE BMP CODE QUEUE MAY BE UPDATED. 
‘ CALLING SEQUENCE: JSR PC ,PUFIFO 

a COMMENTS: 


7% 
;# SUBORDINATE ROUTINES CALLED: SAVBMP. 


8 SEAEASEAASAEASERESEBRASAAEEAREEEREREREAEEEAREEEABREEEAEEREAEEEREEAEEEEREDEDERADS 


PUF IFO: : SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS ,.PREGOS ;CALL REGISTER SAVE SUBRT. 
MOV #512.,R1 SET MAXIMUM TRY COUNT OF 512. 
MOV RBUFA,R4 sGET ADDRESS OF THE RECEIVER BUFFS REGISTER. 
2s: MOV + glia 


sGET THE CONTENTS OF THE RECEIVER BUFFER REG. 
BPL sEXIT IF THE FIFO IS EMPTY, DATA_VALID CLR. 


; "CHECK IF THE READ CHARACTER IS ACTUALLY A BMP CODE. 
; IF IT IS, THEN SAVE IT ON THE BMP CODE QUEUE TO BE REPORTED LATER. 


MOV 70000,RO ;GENERATE A BIT MAP OF CHAR ERROR BITS 
BIC R2,RO ; WHICH ARE NOT SET FOR CHAR 
BNE 46 ;THROW CHAR AWAY IF NOT BMP OR SELFTEST CODE. 


3° 
; CHECK IF THE READ DATA IS MODEM STATUS , BMP OR SELFTEST?. 
- 


MOV #301,RO ; CHECK IF BMP. 

BIC R2,RO ;TRY TO CLEAR BMP FLAGS IN THE READ DATA. 

BNE 43 ;sIF IT IS MODEM OR SELFTEST CODE THROW IT AWAY. 

JSR PC, SAVBMP sSAVE BMP CODE ON THE QUEUE. 
4$: DEC Ri te ge ~ TRY COUNT. 

es ;LOOP TO TRY AGAIN. 

CLC ;CLEAR CARRY TO INDICATE FIFO NOT PURGED. 

BR 60$ cet WITH CARRY CLEAR. 
6$: SEC T CARRY, TO INDICATE FIFO PURGED. 
60$: PASS sRESTORE GPRS, 

JSR PC .@CSP)>+ ;RETURN TO PREGOS SUBRT. 
at pc ;CARRY BIT, SET INDICATES FIFO PURGED. 
S$ 


SEQ 77 


SE BEYBO Di 1d FUNC TST PART1 


004567 163146 
012767 016416 163136 


N6 
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-SBTTL GLOBAL SUBROUTINE - RDPOR - 


$ SESSESELABAEESESESEBEEESEEAEAEEESEEERERERAEAAEEEARAEEREAEAEEREEAEEEEAAEAEEEEDSE 


;* - READ AND VERIFY DATA PATTERN FROM DEVICE REGISTERS ROUTINE - 

34 THIS ROUTINE READS AND VERIFIES THE ROTATED DATA PATTERN WHICH HAS 

34 BEEN WRITTEN BY THE WOPDR SUBROUTINE. 

34 EACH ACTIVE LINE’S REGISTER'S CONTENTS IS READ AND COMPARED WITH THE 

34 WRITTEN DATA. 

54 AFTER THE UNUSED AND READ ONLY (RO) BITS ARE MASKED OUT, ANY ERRORS ARE 
34 REPORTED FROM THIS ROUTINE. 

;* THIS ROUTINE WILL TAKE INTO ACCOUNT THE TYPE OF WRITE OPERATION WHICH 
;4 WAS PERFORMED BY THE WDPDR SUBROUTINE. 

34 

;* INPUTS: Re - USED TO PASS IN THE DATA PATTERN TO BE ROTATED €& VERIFIED. 
34 RS - BYTE INDICATOR (- => LO BYTE, + => HI BYTE, O => BOTH). 

3a R4 - OPERATION TYPE INDICATOR ©- => BIC, + => BIS, O => MOV). 
;* ACTLNS - BIT MAP OF ACTIVE LINES ON THE DEVICE UNDER TEST. 

;* CSRA - CONTAINS THE CSR ADDRESS OF THE DEVICE UNDER TEST 


3:4 DRADRT - BASE ADDR 


34 RRMSG - SET UP WITH THE PROPER ERROR MESSAGE FOR THIS TEST. 

34 ERRNBR - SET UP WITH THE PROPER ERROR ‘ 

34 LPRO - EQUATED TO LPR REG OFFSET FROM DEVICE CSR ADDRESS. 

;* NUMLNS - NUMBER OF LINES ON THE DEVICE UNDER TEST. 

3% NDERPT - NUMBER OF INDIVIDUAL DATA ERRORS TO REPORT ON A LINE. 
34 TXBFCO - EQUATED TO TBUFFCT REG OFFSET FROM DEVICE CSR ADDRESS. 
34 UNBTTB - BASE ADDRESS OF THE UNUSED BIT TABLE. 

3% 

;# OUTPUTS: ERROR MESSAGES MAY BE PRINTED AT THE OPERATOR'S CONSOLE. 

34 ERCNT - ERROR COUNTERS TABLE IS UPDATED FOR LINE UNDER TEST. 

3% ERRBLK - CONTENTS DESTROYED. 

34 ERSMRF - ERROR SUMMARY FLAGS BIT SET IF LINE IN SUMMARY MODE. 
3* UUT CSR - ALL BITS CLEARED, EXCEPT IND.ADR.REG FIELD DESTROYED. 
34% 

;# CALLING SEQUENCE: JSR PC ,.RDPOR 

;* , 

;* COMMENTS: FOR BYTE ACCESSES, ONLY THE SPECIFIED BYTE IS VERIFIED. 


,e 
3* SUBORDINATE ROUTINES CALLED: ER1601,ROLDAP. 


s-- SEASAESESAESEEASARESAAAAEAEAABAREAASASALARAEEASESSRADASESAREREARALERSEAAE LES 


ROPDR:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 
MOV #ER1601,ERRBLK ;SET UP THE ADDRESS OF THE ERROR REPORT RTN. 


+ 
; DETERMINE WHETHER REGISTER DATA SHOULD BE INVERTED FROM DATA PATTERN. 


TST R4 sCHECK THE OPERAND TYPE INDICATOR. 
BPL 2s sBIC WRITE PERFORMED? NO, USE STANDARD DATA, 
COM Re ;YES, INVERT THE DATA PATTERN, 
;* 
; SET UP OUTER LOOP. 
2s: CLR RS sCLEAR LINE COUNTER TO SELECT LINE O. 


; THE OUTER LOOP FOLLOWS. EACH PASS THROUGH THIS LOOP READS AND COMPARES DATA 
; FROM ALL OF THE DEVICE REGISTERS FOR A PARTICULAR LINE IF THE LINE IS ACTIVE. 
¥ 


SEG 7/4 


GLOBAL SUBROUTINE 


020774 
020774 


34 021016 
02 


FUNC TST 


PARTI 


000222 
161364 


002410 


000377 
000377 


177400 
177400 
002370 


177054 


MACRO 1200 
- ROPDR 


1615340 


161220 
161270 


4$: MOV 


Gree ee ce as 


8%: BMI 


B/ 
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R2, 708 
RS ,@CSRA 
RS ,RO 


RO 
aati »ACTLNS 


®LPRO,.RS 


THE INNER LOOP FOLLOWS. 
DATA FROM A DEVICE REGISTER. 


R2,R4 
UNBTTBCR3),R2 
DRADRTCR3),RO 
Oe 


— 


#177400,R2 
—— 


tas 
4 ae 


sSAVE THE OUTER LOOP DATA PATTERN. 
iSET CSR IND.ADR.REG FIELD TO THIS LINE. 


sIS THE LINE ACTIVE? NO, SKIP THE LINE. 
+YES, INITIALIZE REGISTER OFFSET FOR LPR. 


EACH PASS THROUGH THIS LOOP READS AND COMPARES 


sSAVE THE INNER LOOP DATA PATTERN. 
; REMOVE UNUSED BITS FROM EXPECTED DATA. 


sCHECK THE ACCESS TYPE INDICATOR. 
sBYTE ACCESS? YES, GO PERFORM BYTE READ. 
:NO, RFORM WORD READ OF DEVICE REGISTER. 


sLOW BYTE ACCESS? YES, GO DO LOw BYTE READ. 
sHIGH BYTE ACCESS. FORM HIGH BYTE ADORESS. 
sREAD THE HI BYTE OF THE DUT REGISTER. 

sPUT HMI BYTE BACK INTO THE HI BYTE. 

sREMOVE THE UNUSED BYTE IN ACTUAL DATA. 
sREMOVE THE UNUSED BYTE IN EXPECTED DATA. 


sREAD THE LOW BYTE OF THE DUT REGISTER. 
s REMOVE THE UNUSED BYTE. 
sFORM EXPECTED LOW BYTE FOR COMAPARISON. 


sREMOVE UNUSED BITS FROM ACTUAL DATA. 
sCOMPARE ACTUAL AND EXPECTED DATA. 
sACTUAL = EXPECTED? 
sNO. COUNT THE ERROR, CHE 
ERROR SUMMARY? YES. SKIP ERROR. 


3 USE 
oe “BAD BIT(S) IN DEVICE XXXXX REGISTER FOR LINE NN (D). 


TRAP CSERROR 


3° 
sEXIT THIS ROUTINE AND SET THE “EXIT ON ERROR” FLAG, IF EXTENDED ERROR 
sREPORTING HAS NOT BEEN REQUESTED. 


BIT 


14%; 


158: 


@B1T06,0PTION 
14% 

#1, EXOERR 

60% 

R4 ,R2 

PC .ROLDAP 
@2,R3 
R3, oF SLSO 

158 


2 ,R5 
R3,eTXBFCO 
6% 


+ a 
; BACK INTO THE OUTER LOOP. 


NOW SET UP FOR NEXT LINE. 


on he ae ERROR REPORTING BEEN REQUESTED ? 
SET THE EXIT ON ERROR FLAG. 
sEXIT THE ROUTINE 


sRESTORE THE INNER LOOP DATA PATTERN. 

sROTATE DATA PATTERN LEFT, NOT THROUGH CARRY. 
sSET REGISTER OFFSET TO THE NEXT REGISTER. 
sCHECK THAT THIS IS NOT THE ais a” eh all REG. 
s AVOID ALTERING THE OFFSET IF IT ISN'T 

sPOINT AT THE NEXT REGISTER 

sCOMPARE REG OFFSET WITH OFFSET OF LAST REG. 
sLOOP IF NOT ALL REG DONE FOR THIS LINE. 


LOOP IF NOT DONE. 


SEG 


79 


C7 
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3045 021050 016702 000020 16$: MOV 70$,R2 sSET UP TO ROTATE THE DATA PATTERN. 
3046 021054 004767 000410 JSR PC ,ROLDAP IROTATE THE DATA PATTERN, 
3047 021060 005205 INC) 8=—s_ R&'S ;COUNT THIS LINE 
3048 021062 020527 000020 CMP =—s-R'5, @NUMLNS :COMPARE LINE COUNT WITH NUMBER OF LINES. 
3049 021066 002667 BLT 43 sLOOP IF SOME LINES NOT DONE. 
3051 021070 60$: PASS sRESTORE GPRS. 
021070 004736 JSR PC,a(SP)- sRETURN TO PREGOS SUBRT. 
3052 921072 000207 RTS PC 


3054 021074 000000 70$: -WORD 0O sSTORAGE FOR DATA PATTERN CUTSIDE INNER ‘OOP. 


D / 
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3056 .SBTTL GLOBAL SUBROUTINE - REGTST - 
3057 3** SPSOSSESESESESESEEEEESESOAOEEOEAEEEEEEEEEEOEEEEEEEEEDEREEEEEDDEEDAEDEEEBE ESS 
3058 7) - REGISTERS TEST SUBROUTINE - 
3059 34 SUBROUTINE TO TEST THE DEVICE UNDER TEST (DUT) REGISTERS. THE USED 
3060 3¢ BITS OF THE REGISTERS ARE EITHER ALL CLEARED OR ALL SET AND THEN THE 
3061 36 DATA PATTERN IS WRITTEN AND VERIFIED USING EITHER WORD OR BrTE 
3062 ;4 ACCESSES IN READ/WRITE OR READ/MODIF Y/WRITE MODE. 
3° 
3064 3@ INPUTS: RS - BYTE INDICATOR (- => LOW, + => HIGH, O => BOTH BYTES). 
3065 54 R4 - ACCESS MODE (-1 => SET THEN BIC, 1 => CLEAR THEN BIS. 
3066 ;4 (-2 => SET THEM MOV, +2 CLEAR nen MOV). 
3067 34 ERRNBR - SET UP WITH INITIAL ERROR NUMBER 
34 
3069 3@ OUTPUTS: GPRSO - GPR SAVE AREA O IS DESTROYED. 
3070 7) DEVICE UNDER TEST REGISTERS ARE WRITTEN. 
aoe3 3% ERROR MESSAGES MAY BE PRINTED AT THE OPERATORS CONSOLE. 
34 
5078 :@ CALLING SEQUENCE: JSR PC, ,REGTST 
4 i * 
3075 3; COMMENTS: THIS ROUTINE LOOP 16 TIMES WRITING THE SAME DATA PATTERN 
3076 ;@ ROTATED LEFT ONCE EACH ITERATION. 
fd 26 THIS ROUTINE CAN REPORT ERRORS INITIAL ERRNBR THRU INITIAL-2. 
34 
3079 3* SUBORDINATE ROUTINES CALLED: RDPDR,ROLDAP. SWAPO, WOPDR 
3080 3-- CAOCAROSEEASOERREDEREEREEDEEADEDEREDRARSEEAREDERREEEDADEROEESEEREODESCEOSS 
3081 
3082 021076 REGTST:: SAVE sSAVE CONTENTS OF GPRS RO THRU PRS. 
waits 021076 004567 162674 JSR RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 
3 * 
goes ; SET UP THE GPRS FOR THE WRITTING OF THE DATA PATTERN. 
3 - 
3086 021102 012705 000020 MOV 016. ,.R5 3SET UP LOOP COUNTER TO com 16 ITERATIONS. 
3087 021106 012702 167410 MOV @167410,R2 sINITIALIZE THE DATA PATTERN 
3048 021112 032704 000001 BIT @BITO.R4 ;TEST FOR R/w ACCESS. 
30869 021116 001001 ANE 2s 3R/M/wW ACCESS? YES, R4 IS ALL SET UP. 
3090 021120 005004 CLR R4 sNO, INDICATE R/w ACCESS. 
soos 021122 23: 
3 * 
io ; SET UP THE GPRS FOR THE CLEARING OR SETTING OF ALL THE USED BITS. 
3- 
3095 021122 010400 MOV R4,RO sPASS OPERATION TYPE INDICATOR ~1 SWAPO. 
3096 021124 004767 001272 JSR PC, SWAPO :GET ALTERNATE GPR SET IN R1 THRU R 
3097 021130 016701 162634 MOV ERRNBR,R1 sSAVE THE INITIAL ERROR NUMBER. 
3098 021134 010004 MOV RO,R4 
3099 021136 005404 NEG R4 sSET UP OP TYPE FOR CLEARING OR SETTING. 
3100 021140 005002 CLR R2 ;SET UP CLEAR WRITE PATTERN. 
3101 021142 026627 000012 000002 CMP R4SLOT(SP),e2 i TEST FOR CLEAR THEN MOV TEST SEQUENCE. 
3102 021150 001401 BEQ 4$ 2 ea THEN MOV? YES, LEAVE mite PAT CLEAR, 
3103 021152 005102 COM R2 SET ALL BITS OF WRITE PATTERN. 
3104 021154 005003 4$; CLR Az UNOICATE THAT WORD ACCESSES a BE USED. 
3105 021156 005000 CLR RO 3SET ALTERNATE BYTE EXPECTED DATA PAT TO CLEAR. 
3106 021160 026627 000012 177776 CMP R4SLOT(SP),¢-2 I TEST FOR SET THEN MOV TEST SEQUENCE. 
3107 021166 001001 BNE 6$ 3SET THEN MOV? YES, LEAVE ALT BYTE PAT CLEAR. 
3108 021170 005100 COM RO 3NO, SET ALT BYTE EXPECTED DATA PAT TO ALL 21'S. 
ae 021172 004767 001224 63; JSR PC, SWAPO sRESTORE SWAPPED GPR VALUES TO R1 THRU RS. 


3; * 
S111 ; START OF DATA PATTERN LOOP. 
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GLOBAL Si BROUTI 


3ile2 
3113 
4 


021176 


021176 


021212 


021216 
021222 


021224 


021250 
021254 
021240 


021244 
021250 


021252 
021254 


021270 


021274 
021300 


021302 
021304 


021306 
021312 
021314 


FUNC TST 
NE 


005403 


PART1 


161034 


162500 
177330 


161004 


000156 


ey 
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- REGTST - 


S = 

8$: 
3* 
; SET OR CLEAR ALL THE USED BITS OF THE DEVICE REGISTERS FOR ALL LINES. 
; VERIFY THAT ALL THE BITS WERE SET OR CLEARED CORRECTLY. 


JSR PC ,SWAPO sGET ALTERNATE GPRS FOR SETTING INTIAL STATES. 
JSR PC .WOPDR sGO CLEAR ALL USED REGISTER BITS, ALL LINES. 
MOV R1,ERRNBR sSET UP ERROR NUMBER TO INITIAL ERRNBR. 

JSR PC .RDPDR sVERIFY ALL USED REGISTER BITS, ALL LINES. 


3;* 
sEXIT THIS ROUTINE IF AN ERROR HAS BEEN FOUND AND EXTENDED ERROR REPORTING 
sHAS BEEN REQUESTED, I.E£. EXOERR IS NON-ZERO. 


g¢ 
TST EXOERR sHAS AN ERROR BEEN FOUND ? 
BNE 60$ sEXIT THIS ROUTINE IF IT HAS. 


JSR PC, SWAPO sRESTORE MAIN GPRS CONTENTS. 
3° 
; WRITE DATA PATTERNS, ALL LOKER BYTE USED BITS, ALL REGISTERS, ALL LINES. 


; VERIFY THAT THE DATA PATTERN WAS WRITTEN CORRECTLY. 
3= 


JSR PC ,WOPDR sWRITE DATA PATTERN TO DEVICE REGISTERS. 
INC ERRNBR sSET ERROR NUMBER TO INITIAL +1. 
JSR PC ,.RDPOR sVERIFY DATA PATTERN IN ALTERRED BYTE(S). 


3* 

sEXIT THIS ROUTINE IF AN ERROR HAS BEEN FOUND AND EXTENDED ERROR REPORTING 
sHAS BEEN REQUESTED. 

| 


TST EXOERR sHAS AN ERROR BEEN FOUND ? 
BNE 608 sEXIT THIS ROUTINE IF IT HAS. 
TST R3 sCHECK THE BYTE INDICATOR. 
BEQ 10% sWORD ACCESS? YES, SKIP SECOND BYTE CHECK. 


3* 
s CHECK THAT THE ALTERNATE (UNMODIFIED) BYTE IS CLEAR OR SET AS EXPECTED. 


MOV R2,R1 sSAVE THE DATA PATTERN. 

MOV RO,R2 sGET THE ALTERNATE BYTE EXPECTED DATA. 

NEG R3 sINDICATE THAT OTHER BYTE IS TO BE CHECKED. 
INC ERRNBR ;SET ERROR NUMBER TO INITIAL<+2. 
JSR PC, sVERIFY DATA PATS IN OTHER BYTES OF REGISTERS. 


3° 
sEXIT THIS ROUTINE IF AN ERROR HAS BEEN FOUND AND EXTENDED ERROR REPORTING 
sHAS BEEN REQUESTED. 

) 


TST EXOERR sHAS AN ERROR BEEN FOUND ? 
BNE 60$ sEXIT THIS ROUTINE IF IT HAS. 

NEG R3 sRESTORE BYTE INDICATOR. 

MOV R1,Re2 sRESTORE DATA PATTERN. 


3° 
; PEPARE THE NEXT DATA PATTERN AND LOOP IF NOT DONE. 
3- 


10%: JSR PC ,.ROLDAP sROTATE DATA PATTERN LEFT, NOT THROUGH CARRY. 
DEC RS sCOUNT THIS ITERATION OF THE LOOP. 
BGT 8$ sALL PATTERNS DONE? NO, LOOP. 


SEQ 


CZRHUBO Dra 14 FUNC TST PARTI 


3169 
3170 021316 016767 161126 162444 60$: 


3171 021324 
021324 004736 
35172 021326 000207 
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GPRSOB , ERRNBR 
JSR 


MOV 
PASS 
RTS PC 


;YES, RESTORE ERROR NUMBER AND EXIT 


;GET THE E 


RROR NUMBR FROM GPR SWAP STORAGE. 


sRESTORE GPRS. 


PC,@(SP )+ 


sRETURN TO PREGOS SUBRT. 


SEBE°PamodHatene TST PRT 


021330 
021330 
021334 
021340 


021342 


021350 
021350 


021352 
021352 
021354 


004567 
005767 
001404 


012767 


104460 


004736 
000207 


162442 
161122 


016722 162424 


G/ 
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-SBTTL GLOBAL SUBROUTINE - REPSMR - 


3¢*¢ SESSSEEEEEASESEERESESESESELASEREAARACEEOEEEDEADEEEREDEREEAEEEREEAEDEDEDADES * 


34 - REPORT ERROR SUMMARY ROUTINE - 

34 THIS SUBROUTINE REPORTS AN ERROR SUMMARY FOR THOSE LINES WHICH HAVE 
34 EXCEEDED iHE NUMBER OF INDIVIDUAL ERRORS TO REPORT FOR A SINGLE LINE 
;4 IN A SING_E TEST. THIS PARAMETER CAN BE SPECIFIED BY THE OPERATOR IF 
;¢ HE/SHE ANSWERS THE SOFTWARE PARAMETER QUESTIONS. 

;* 

3# INPUTS: ERCNTB - LABEL AT BASE OF LINE ERROR COUNTERS TABLE. 

34 ERRMSG - ADDRESS OF PRIMARY ERROR MESSAGE. 

34 ERRNBR - ERROR NUMBER OF ERRORS IN THIS ROUTINE. 

34 ERSMRF - “REPORT ERROR SUMMARY FOR LINE” FLAGS. 

34 

;# OUTPUTS: ERRBLK - ADDRESS OF ERROR REPORTING ROUTINE (DESTROYED). 


34 SUMMARY MESSAGES MAY BE PRINTED AT THE OPERATOR CONSOLE. 
& 
;# CALLING SEQUENCE: 


JSR PC ,REPSMR 
34 
3# COMMENTS: IF NO LINES HAVE EXCEEDED THE MAXIMUM NUMBER OF INDIVIDUAL 
5 ERRORS TO REPORT, NO MESSAGES ARE PRINTED BY THIS ROUTINE. 
3% ERROR SUMMARIES IN THIS ROUTINE ARE REPORTED AS ERRORS. 
ta THE CONTENTS OF ERRBLK ARE DESTROYED. 
34 
;* SUBORDINATE ROUTINES CALLED: 
s-- SESSSSESSESESAAESEEASEEASEREASEAASSESAEASHEASESSAAEEEEEEEREEADEAAEEEEAEEDRES 
REPSMR:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS ,PREGOS :;CALL REGISTER SAVE SUBRT. 
TST ERSMRF ;CHECK THE “PRINT LINE ERROR SUMMARY” FLAGS. 
BEQ 60$ sEXIT WITHOUT ACTION IF NO SUMMARY FLAGS SET. 
se 
; WE HAVE SOME ERROR SUMMARIES TO REPORT. 
MOV @ER9004,ERRBLK ;SELECT ERROR REPORTING ROUTINE. 
3° 
; REPORT 
3 “ERROR SUMMARY REPORT FOR LINES WITH EXCESSIVE NUMBERS OF ERRORS: ” 
ee 
ERROR 
TRAP CSERROR 
60$: PASS sRESTORE GPRS. 
aie pe JSR PC,.@(SP)- ;RETURN TO PREGOS SUBRT. 


SEG 


Aa 


EBERT SP BROOTINENS ‘ST PARTI 


021356 
0 


021422 
021424 
021430 
021434 


004567 
012702 


103012 


010277 
004767 


162414 
000040 


160650 


011610 
176554 


160624 
000722 


011610 
176530 


H/ 
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.SBTTL GLOBAL SUBROUTINE - RESETT - 
i FESEESEEEEEAESEERESEEESEAEEEAREREREEREREREEAAEDEAADEEREREEEDEAERD EREDAR EDEDEESS 


34 - RESET DEVICE UNDER TEST - 

34 THIS SUBROUTINE IS USED TO RESET THE DUT TO A KNOWN STATE. 

34 IF RESET DOES NOT SUCCESFULLY COMPLETE, IE. TIME-OUT OCCURS, THEN 

;* AN ABORT TEST ERROR MESSAGE IS REPORTED. 

;* 

;* INPUTS: CSRA - CONTAINS THE ADDRESS OF THE CSR 

34 TXBFCA - CONTAINS ADDRESS OF DUT DMA BUFFER COUNT REGISTER. 
3% ERRTBL- ERRTYP,ERNBR,AND ERRMSG SET UP CORRECTLY. 

34 

;* OUTPUTS: THE DUT PERFORMS ITS RESET FUNCTION INTO A KNOWN STATE. 

3* CARRY - CLEAR INDICATES THE TEST IS TO BE ABORTED. 

34 ERRBLK - VALUE MAY BE DESTROYED. 

3% IESTAT - TX AND RX INTERRUPT FLAGS ARE CLEARED. 

34 TX AND RX INTERRUPT ENABLE BITS IN THE DUT’S CSR ARE CLEARED. 
3% 

:* CALLING SEQUENCE: JSR PC ,RESETT 

3% 

;* COMMENTS: THIS SUBROUTINE CAN REPORT ERRORS WITH NUMBERS INITIAL ERRNAR 
34 THIS ROUTINE DOES NOT DESTROY THE VALUE OF ERRNBR. 


34 : 
3;# SUBORDINATE ROUTINES CALLED: DELAY,MSLGET. 


§ PSERSSSASSESSEEHERASESEASEASESEEEESLESORESAEESEEESEASAAEEEAEEEEEREEEAEREEEEEDEDES 


RESETT:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
J S.PREGOS ;CALL REGISTER SAVE SUBRT. 
MOV SBITOS,Re2 sSET BIT MASK OF MASTER RESET BIT. 


3; * 

; TEST THE STATE OF THE MASTER RESET BIT IN THE CSR. 

; IF MR IS SET THEN WAIT FOR SELF-TEST TO COMPLETE. 

; IF TIME-OUT OCCURS, REPORT THE ERROR AND PASS-OUT ABORT TEST INDICATOR. 
+ ie 


sGET THE ADDRESS OF THE DUT’'S CSR. 

sCHECK STATE OF MASTER RESET BIT. 

;DON'T DELAY IF MR IS ALREADY CLEAR. 

sSET UP DESIRED STATE OF MASTER RESET BIT. 
sPASS TIME-OUT VALUE OF 5S SECONDS. 

sWAIT FOR SELF-TEST TO COMPLETE, MR CLEAR. 
BCC 4S 3GO REPORT ERROR IF TIMEOUT OCCURRED. 


3? 
; SET MASTER RESET BIT IN CSR. CLEAR TX AND RX ENABLE BITS, ETC. 
SKIP THE SELFTEST 


TIME-OUT OF 5S SECS, JUST IN CASE THE SELF-TEST EXECUTES. 


> 

: 

he 

2s; MOV R2,@CSRA sSET MASTER RESET BIT, DISABLE TX AND Rx INTS. 
JSR PC ,SKPSTS ;TRY TO SKIP THE SELFTEST. 


; 
: SET SELF-TEST TIME-OUT OF S SECONDS, AND WAIT FOR M.R TO CLEAR. 

; IF TIME-OUT OCCURS, THEN REPORT THE FATAL ERROR AND PASS-OUT THE ABORT 
; TEST INDICATOR. 

; 


CLR R3 sSET UP DESIRED STATE OF MASTER RESET BIT. 
MOV #5000. ,R1 sPASS TIME-OUT VALUE OF 5 SECONDS. 

JSR PC ,MSLGET sWAIT FOR SELF-TEST TO COMPLETE, MR CLEAR. 
BCS 6$ ;SKIP ERROR REPORT IF MR CLEARED IN TIME. 


SEQ 85 


GCOBAP sPeROdt NEN: "5" 


021436 
021442 


021450 
021450 
021452 
021454 


021456 
021462 


021464 
021464 


021466 


012701 
012767 


104460 
000241 
000403 


005067 


000261 


004736 
000207 


PARTI 


012221 
016526 


160626 
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, 


Bowe oo oe ov 


$: 
162324 


SET UP ERROR MESSAGE TO REPORT “FATAL ERROR FOUND DURING R : 
INDICATE TEST IS TO BE ABORTED BY CLEARING THE CARRY BIT.’ © >) ABORTED”. 


MOV #EM1601,R1 sPASS ERROR MESSAGE TO REPORT. 

—, ; sina *ine bar aeko ~ d 4 ERROR HANDLING ROUTINE. 

3 LL = W F 
i nTest ren: ME -OU UR NG FOR MASTER RESET TO CLEAR 


; >>>>> ERROR <<ccc 
TRAP SERR 
CLC ; INDICATE TEST IS TO BE ABORTED. ——- 
BR 60$ sEXIT THIS SUBROUTINE, ABORT TEST INDICATOR. 


3 
; CLEAR TX AND RX INTERRUPT ENABLE STATUS FLAGS IN IESTAT. 
; EXIT WITH CONTINUE TEST INDICATOR SET CIE,CARRY SET). 


63: 


60$: 


CLR IESTAT sCLEAR TX AND RX INTERRUPT STATUS FLAGS. 
SEC sINDICATE SUCCESS, CONTINUE TEST. 
PASS sRESTORE GPRS, PASS THE FOLLOWING INTACT: 
JSR PC,a(SP)- sRETURN TO PREGOS SUBRT. 
ats pc sCARRY BIT: IF CLEAR, INDICATES ABORT TEST. 


SEQ BF, 


SEBHP°SPaabtrhANe TST PART 


3320 
3321 


021470 
021470 


021512 


prog ad 162302 


00570 


J/ 
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-SBTTL GLOBAL SUBROUTINE - ROLDAP, - 


§ SESEEEOSEEEOEEDEEEEREEESEEEEACEESEDEEEEEEREEEEEEEEEEEHEAEDEREEEEEEEEEDEREEEESS 


34 - ROTATE LEFT DATA PATTERN 

;* THIS ROUTINE ROTATES THE PASSED INPUT DATP PATTERN LEFT,WITHOUT GOING 
;¢ THROUGH THE CARRY.THE CARRY IS INITIALLY SET OR CLEARED DEFENDING 

;* UPON THE STATE OF THE MSB OF THE DATA PATTERN,BEFORE A ROL INSTRUCTION 
;* IS EXECUTED. 

;* 

;* INPUTS: R2 - CONTAINS THE DATA PATTERN TO BE ROTATED 


R2 - CONTAINS THE ROTATED DATA PATTERN 
PC ,ROLDAP 


;* 

;# OUTPUTS: 
Se CALLING SEQUENCE: JSR 
~ COMMENTS: 

t@ SUBORDINATE ROUTINES CALLED: NONE 


§ SPSEEAEEEASEEAEAEAEEEAREEEREOEASEEBEEEEEAEEEESALAEEEEERESEEEDREEEEEEEEOEEEDEEEEESE 


;SAVE CONTENTS OF GPRS RO THRU RS. 

RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 
TST Re ;CHECK MSB, AND CLEAR CARRY. 

BPL 2s ;BRANCH IF CLEAR. 

SEC ;SET CARRY IF MSB SET 


ROLDAP : : SAVE 
JSR 


2s: ROL Re sROTATE DATA PATTERN LEFT 

605: PASS Re sRESTORE GPRS,EXCEPT 
MOV R2,R2SLOT( SP) sPUT R2 IN STACK SLOT. 
JSR PC,a(SP)-> sRETURN TO PREGOS SUBRT. 


;R2 - CONTAINS THE ROTATED DATA PATTERN 
RTS PC 


SEQ 87 


IK / 
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3323 .SBTTL GLOBAL SUBROUTINE - RSTRPT - 
3324 se SESEEEASESEEEESESSESESEDEEEEEEEAELEREEEDEAEEEEDEDEEEEEEEEE DE EEDEDEDEEEEEDDES 
3325 ;¢ - REPORT ANY RESET ERRORS ROUTINE - 
3326 34 THIS ROUTINE DETERMINES IF ANY ERROR CODES ARE AMONG THE DIAGNOSTIC 
3327 ;* COCES REPORTED PLACED IN THE DUT RECEIVED CHARACTER FIFO BY THE 
3328 ;* SELF-TEST. IF ANY NON BMP ERROR CODES ARE FOUND, OR IF OTHER ERRORS 
3329 34 ARE ENCOUNTERED, APPROPRIATE ERRORS ARE REPORTED. ANY BMP CODES THAT 
3330 34 ARE FOUND, ARE PLACED ON THE BMP CODE QUEUE TO BE REPORTED LATER. 
3331 34 THIS ROUTINE ALSO PURGES THE DUT FIFO LOOKING FOR ANY CHARACTERS 
Sane 3* OR MODEM STATUS CODES. IF ANY ARE FOUND, ERRORS ARE REPORTED. 
34 
3334 ;# INPUTS: ERRMSG - ADDRESS OF THE PRIMARY ERROR MESSAGE. 
3335 ;* ERRNBR - ERROR NUMBER OF FIRST ERROR REPORTED BY THIS ROUITNE. 
3336 34 NUMLNS - EQUATED TO THE NUMBER OF LINE ON THE DUT. 
Hd ;* RBUFA - CONTAINS ADDRESS OF THE DUT RECEIVER FIFO. 
3% 
3339 ;# OUTPUTS: CARRY - SUCCESS FLAG (SET IF FIFO CLEARED SUCCESSFULLY). 
3340 ;4 ERRBLK - ADDRESS OF THE ERROR REPORT ROUTINE (DESTROYED). 
ed 78 ERROR MESSAGES CAN BE PRINTED AT THE OPERATORS CONSOLE. 
2 ;* 
oa ;* CALLING SEQUENCE: JSR PC,RSTRPT 
re 34 
3345 ;* COMMENTS: THIS SUBROUTINE CAN REPORT ERRORS WITH NUMBERS INITIAL ERRNBR 
3346 34 THRU INITIAL ERRNBR:4. 
seen 34 THIS ROUTINE DOES NOT DESTROY THE VALUE OF ERRNBR. 
34 
3349 3# SUBORDINATE ROUTINES CALLED: EROS03,ER9007,ER9008, SAVBMP. 
3350 F-- SSMESSOSSAAESAAEHASESESEASEEEEEEEEEEEEEEEEEDDEEEEEDEEEEEEEEEEEEDEEEEEREDEDE 
3351 
3352 021514 RSTRPT:: SAVE ;SAVE CONTENTS UF GPRS RO THRU RS. 
3353 021514 004567 162256 JSR RS ,.PREGOS ;CALL REGISTER SAVE SUBRT. 
3; * 
3354 ; READ CORRECT NUMBER (NUMBER OF LINE ON DUT) OF CHARS FROM THE FIFO. 
seaa ; VERIFY THAT EACH CHAR IS A SELFTEST SUCCESS CODE. 
} Piece 
3357 021520 005003 CLR R3 ;CLEAR THE CODE COUNTER. 
3358 021522 016705 162242 MOV ERRNBR ,RS ;SAVE ERRNBR FOR RESTORATION LATER. 
3359 021526 017702 160512 2s: MOV @RBUFA,R2 sREAD A CHAR FROM THE DUT FIFO. 
sare 021532 100422 BMI 4$ ;SKIP ERROR IF DATA.VALID SET FOR CHAR. 
3; * 
og ; WE EXPECT A SELFTEST CODE, BUT THIS FIFO SLOT IS EMPTY. 
Bis 
3364 021534 010567 162230 MOV RS ,ERRNBR sRESTORE ERROR NUMBER TO INTITIAL VALUE. 
3365 021540 012701 015127 MOV 9€M9016,R1 sPASS ERROR MESSAGE INFO TO ER9007 ROUTINE. 
saee 021544 012767 017036 162222 MOV ®ER9007,ERRBLK ;SELECT PROPER ERROR REPORT ROUTINE. 
3;* 
3368 ; REPORT ERROR WITH NUMBER INITIAL ERRNRB. 
zaee ; "NO SELFTEST CODE IN SELFTEST CODE FIFO SLOT FOR LINE NN AFTER RESET. ” 
Ne 
3371 021552 ERROR 3 >>>>> ERROR <<ccc, 
3372 021552 104460 TRAP CSERROR 
3 * 
soya ; EXIT THIS ROUTINE IF EXTENDED ERROR REPORTING HAS NOT BEEN REQUESTED. 
- 
3375 021554 032767 000100 160442 BIT #BITO6 , OPTION sHAS EXTENDED ERROR REPORTING BEEN REQUESTED 2? 
3376 021562 001003 BNE 3$ sAVOID SET THE FLAG IF IT WAS, 


3377 021564 012767 000001 160512 MOV #1,EXOERR ;SET THE EXIT ON ERROR FLAG 


GCOBAL steRout ine” ‘5! 


€21572 
(21574 


221600 
('21604 
021606 


021610 
021614 


021672 
021672 


021674 
021702 


021704 
021712 


021714 
021720 
021726 
021732 


001462 


012701 
012767 


104460 


032767 
001027 


012767 
000534 


012701 
012767 


PARTI 


000406 


070001 


162114 


017126 


000100 


000001 


162050 
2 


00000 
015137 
017036 


L/ 
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162102 


160322 


160372 


162042 
162034 


3$: 


4$: 


6$: 


INIDICATE “SUCCESS” (BECAUSE FIFO IS PURGED), AND EXIT THIS ROUTINE. 


SEC sSET SUCCESS FLAG. 
JMP 60$ sEXIT ROUTINE. 
3+ 
; DETERMINE IF THIS IS NOT A SELFTEST CODE. 
:- 
MOV #70001 ,RO sGENERATE BIT MAP OF “7H CLEAR ERROR BITS OR 
BIC R2,RO ; BIT O WHICH ARE CLEAR 
BNE 8$ ;GO TO REPORT ERROR IF THIS IS NOT A TEST CODE. 
3° 
; WE HAVE A TEST CODE CEITHER BMP + SELFTEST CODE). 
; DETERMINE WHAT TYPE OF CODE WE HAVE. 
BIT @BIT7,.R2 ;TEST ROM VERSION CODE INDICATOR BIT. 
BEQ 10$ sSKIP ERRORS IF SELFTEST ROM VERSION CODE. 
CMPB R2,%203 ;CHECK IF SKIP SELF TEST CODE. 
BEQ 10$ ;SKIP ERROR REPORT IF SKIP ~~ TEST CODE FOUND 
CMPB = R2,0201 sCHECK IF NULL CODE PRESENT 
BEQ 10$ sSKIP ERROR REPORT IF SELF TEST NULL CODE. 
MOV #300 ,RO sTEST CODE TYPE BITS FOR BOTH CODE 
BIC R2,RO ;_ TYPE BITS SET CINDICATING BMP CODE). 
BNE 6$ ;IF IT IS NOT A BMP CODE GO REPORT ERROR. 
JSR PC, SAVBMP sSAVE THE BMP CODE ON THE QUEUE. 
BR 10$ :G0 GET THE NEXT CHARACTER FROM THE FIFO. 
3° 
; WE HAVE A SELFTEST ERROR CODE. 
3- 
MOV RS ,ERRNBR sRESTORE ERROR NUMBER TO INTITIAL VALUE. 
INC ERRNBR sCALCULATE INITIAL ERROR NUMBER PLUS 1. 
MOV #EM9020 .R1 sPASS ERROR MESSAGE INFO TO ER9008 ROUTINE. 
MOV PER9008.ERRBLK ;SELECT PROPER ERROR REPORT ROUTINE. 


, "REPORT ERROR WITH NUMBER INITIAL ERRNRB «+ 1. 
i “UNEXPECTED SELFTEST ERROR CODE FOR LINE NN IN FIFO AFTER RESET:” 


eh ERROR 3 >>>>> ERROR <<<c<, 
TRAP CSERROR 


3 * 
; EXIT THIS ROUTINE IF EXTENDED ERROR REPORTING HAS NOT BEEN REQUESTED. 
Be 


BIT @BITO6,OPTION ;HAS EXTENDED ERROR REPORTING BEEN REQUESTED ? 
BNE 10$ sAVOID SET THE FLAG IF IT HAS AND GO TO 
;THE END OF THE LOOP. 
MOV #1,EXOERR :SET THE “EXIT ON ERROR” FLAG 
BR 50$ sEXIT THE ROUTINE WITH FAILURE SINCE THE FIFO 
3IS NOT PRUGED. 
3* 
; WE HAVE A NON-SELFTEST CODE (EITHER BMP CODE OR DATA CHAR). 
Be 
MOV RS, ERRNBR sRESTORE ERROR NUMBER TO INTITIAL VALUE. 
ADD #2, eg gl sCALCULATE INITIAL ERROR NUMBER PLUS 2. 
MOV 9€M9019,R sPASS ERROR MESSAGE INFO TO ER9007 ee. 
MOV #ER9007, ERRBLK ;SELECT PROPER ERROR REPORT ROUTINE 


; REPORT ERROR WITH NUMBER INITIAL ERRNRB + 2. 


SEQ 89 


CZ 


021740 
021740 


021742 
021750 


021752 
021760 


021762 
021764 
021770 


021772 


022024 


022026 
022032 
022034 


022036 
022042 


022044 
022050 


022052 


84 022056 


022060 


DHUBO DHU-11 FUNC TST 
GLOBAL S\'BROUT INE 


104460 


032767 
001004 


012767 
000511 


012701 
000423 


032702 
001003 


012701 
000415 


032702 


PARTI 


000100 


000001 


000010 


000022 
161766 
000003 
017126 
160222 


070000 


015200 


000001 


015217 


000200 
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- RSTRPT - 


160254 


1£0324 


161760 
161756 


ERROR 


BIT 


BNE 


MOV 


M/ 


#1,EXOERR 
50$ 


“NON-SELFTEST CODE IN SELFTEST CODE FIFO SLOT FOR LINE NN AFTER RESET.” 
; >>>>> ERROR <<ccc, 


TRAP CSERROR 


; EXIT THIS ROUTINE IF EXTENDED ERROR REPORTING HAS NOT BEEN REQUESTED. 
. #B1T06, OPTION 
10$ 


sHAS EXTENDED ERROR REPORTING BEEN REQUESTED ? 
sAVOID SET THE FLAG IF IT HAS AND GO TO 

;THE END OF THE LOOP. 

;SET THE “EXIT ON ERROR” FLAG 

sEXIT THE ROUTINE WITH FAILURE. 


3;* 
; END OF LOOP, LOOP IF NOT ALL CHARS HAVE BEEN READ FROM THE FIFO. 


sSET CODE COUNTER FOR NEXT ITERATION OF LOOP. 
;TEST FOR ALL CODES READ. 
;LOOP IF NOT CHARS READ FROM FIFO. 


; PURGE THE FIFO UNTIL DATA.VALID IS CLEAR OR UNTIL TOU MANY CHARS ARE READ. 


sINITIALIZE THE CHARACTER COUNTER. 

;GET INITIAL VALUE OF THE ERROR NUMBER. 
sCALCULATE ERROR NUMBER OF NEXT ERROR. 

;SELECT PROPER ERROR REPORT ROUTINE. 

sREAD A CHARACTER FROM THE DUT FIFO. 

; INDICATE SUCCESS IN CASE DATA.VALID IS CLEAR. 


sEXIT ROUTINE WITH SUCCESS IF DATA.VALID CLEAR. 


ER. 
IF CHARACTER IS A DATA CHARACTER. 


;TEST BITS 12 THRU 14 OF THE 
; CODE READ FROM THE DUT FIFO. 
sSKIP THIS ERROR IF CODE IS NOT A DATA CHAR. 


3* 
; WE HAVE AN UNEXPECTED DATA CHARACTER: SET UP AND GO TO REPORT ERROR. 


10$: INC R3 
CMP R3,%8. 
BLT 2$ 
| 
MOV 18. ,R4 
MOV RS ..ERRNBR 
ADD #3,ERRNBR 
MOV #ER9006 , ERRBLK 
12$: MOV @RBUFA,R2 
SEC 
BPL 60$ 
3;* 
; WE HAVE A CHARACT 
; DETERMINE 
ig 
MOV #70000 ,RO 
BIC R2,RO 
BEQ 14$ 
3- 
MOV #EM9022 ,.R1 
BR 22s 


+ 


z 
; WE HAVE AN UNEXPECTED CODE. 


sSELECT ERROR MSG INFO FOR ERO808 ROUTINE. 
:GO TO REPORT THIS ERROR. 


; DETERMINE IF THE CODE IS A MODEM STATUS CODE. 


F 
14$: 


BIT 


BNE 


#BITO,R2 
16% 


;TEST MODEM STATUS INDICATOR BIT OF CODE. 
sSKIP THIS ERROR IF NOT MODEM STATUS CODE. 


3 * 
; WE HAVE A MODEM STATUS CODE: SET UP AND GO TO REPORT ERROR. 


3; * 


MOV 


#EM9023,R1 
22$ 


;SELECT ERROR MSG INFO FOR EROS8O8 ROUTINE. 
3GO TO REPORT THIS ERROR. 


; WE HAVE AN ONBOARD TEST CODE. 
; DETERMINE IF THIS CODE IS A BMP CODE. 


16$: 


BIT 


#BIT7,R2 


;TEST THE ROM VERSION BIT OF THE CODE. 


SEG 90 


O DHU-11 FUNC TST 


CZDHUBO 
GLOBAL SUBROUTINE 


022074 


022076 
022102 


022104 


3 022110 


022112 
022112 


022114 
022122 


022124 


022132 
7 


022134 
022136 


022140 


022166 
022174 
022176 
022204 


022206 


012701 
000403 


004767 
000411 


104460 


032767 
001004 


012767 
000424 


005304 
001327 


012701 


012767 


104460 


032767 
001003 
012767 


000241 


PARTI 
000300 
015241 


000166 


000100 


000001 


015016 
161620 


000004 
016136 


000100 
000001 
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- RSTRPT - 


160102 


160152 


161612 
161610 


160030 
160100 


N7/ 


BEQ 18$ ;GOTO SET UP FOR SELFTEST CODE IF ROM VERSION. 
MOV 300.RO 
BIC R2.RO ;TEST THE ERROR TYPE BITS OF THE CODE. 
BEQ 20$ ;SKIP THIS ERROR IF BMP CODE. 
3+ 
; WE HAVE A SELFTEST CODE: SET UP AND GO TO REPORT ERROR. 
18$: MOV #€M9024,R1 ;SELECT ERROR MSG INFO FOR ERO808 ROUTINE. 
BR 22 ;GO TO REPORT THIS ERROR. 
; WE HAVE A BMP CODE: SAVE IT ON THE QUEUE. 
208: JSR BC, SAVBMP ;SAVE THE BMP CODE ON THE QUEUE. 
3 
; REPORT THE ERROR WITH ERROR NUMBER OF INITIAL ERRNBR + 3. 
: “UNEXPECTED XXX XXXX FOR LINE NN IN FIFO AFTER RESET: ° 
3 = 
22s: ERROR : >>>>> ERROR <<ccc<, 


243: 


° 


50$: 
60$: 


REPOR 


TRAP CSERROR 


3¢ 
; EXIT THIS ROUTINE IF EXTENDED ERROR REPORTING HAS NOT BEEN REQUESTED. 


BIT 
BNE 


MOV 
BR 


;¢ 
; END OF 


#BITO6 ,OPTION 
24$ 


#1,EXOERR 
50$ 


sHAS EXTENDED ERROR REPORTING BEEN REQUESTED ? 
sAVOID SETTING THE FLAG IF IT HAS AND GO TO 
THE END OF THE LOOP. 

;SET THE “EXIT ON ERROR” FLAG 

sEXIT THE ROUTINE WITH FAILURE. 


LOOP . 
; COUNT THE CHARACTER WE JUST RECEIVED, AND CHECK FOR TOO MANY RECEIVED. 


DEC 
BNE 


T 
MOV 
MOV 
ADD 
MOV 


R4 
12$ 


#EM9017,R1 
RS ,.ERRNBR 
04 ,E 
0503, ERRBLK 


ER 
;PRINT ERROR REPORT. 
ERROR 


ew THIS CHARACTER. 
LOOP IF NOT TOO MANY CHARACTERS PURGED. 


WE READ TOO MANY VALID CHARACTERS WHILE TRYING TO PURGE THE FIFO. 
ERROR AND EXIT WITHOUT SUCCESS. 
“FIFO WILL NOT PURGE (DATA.VALID STUCK SET), REMAINDER OF TEST SKIPPED. ” 


sSELECT PROPER ERROR MESSAGE. 

sGET INITIAL ERROR NUMBER 

sCALCULATE INITIAL ERRNBR + 4. 
;SELECT PROPER ERROR REPORT ROUTINE. 


; >>>>> ERROR <<<cc, 
TRAP CSERROR 


3* 
; EXIT THIS ROUTINE IF EXTENDED ERROR REPORTING HAS NOT BEEN REQUESTED. 


BIT 
BNE 

MOV 

CLC 
PASS 


@BITO06 ,OPTION 
50$ 
#1,EXOERR 


sHAS &XTENDED ERROR REPORTING BEEN REQUESTED ? 
sAVOID SETTING THE FLAG IF IT HAS. 

;SET THE "EXIT ON ERROR” FLAG 

;CLEAR THE SUCCESS FLAG. 


sRESTORE GPRS, 


SEG 91 


b8 
CZDHUBO DHU-11 FUNC TST PARTI MACRO M1200 15-MAR 84 09:15 PAGE 69-4 50 92 
GLOBAL St SROUT INE - ASTRPT. 


022206 004736 JSR PC .a( SP)» sRETURN TO PREGOS SUBRT. 
8545 022210 000207 RTS PC ; CARRY - SUCCESS FLAG (SET IF FIFO IS PURGED). 


EZRENBO Di ad EWING TST PARTI 


ooonte 


022250 


010046 


104440 
010046 


012700 
104441 
042767 
016777 


012600 
104441 
012600 
000207 


000340 
137777 


160050 160000 


C8 
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160054 


-SBTTL GLOBAL SUBROUTINE 


- RXIEO - 


s** — a one eee ee oes Peoeeesesesabesesnssenseoesesesonsessoosocoss 


:¢ RECEIVER INTERRUPT DISABLE - 
3¢ THIS ROUTINE IS USED TO DISABLE RECEIVER INTERRUPTS IN THE OHU11. 
34 
3* INPUTS: NONE . 
3% 
3@ OUTPUTS: THE RX.INT.ENBL BIT IS CLEARED IN THE DUT CSR. 
3% IESTST CONTAINS THE UPDATED STATUS OF THE Tx AND Rx INTERRUPT 
3* ENABLE BITS. 
7% 
;@ CALLING SEQUENCE: JSR PC, ,RXIEO 
3° 
3@ COMMENTS: THE CONTENTS OF THE INDIRECT ADDRESS REGISTER FIELD IN 
38 THE DUT CSR ARE DESTROYED. 
34 
3 SUBORDINATE ROUTINES CALLED: NONE. 
$-- .; ae A ee cake meeeenne eS ononnebennocsesseososooesesece 
RXIEO:: MOV RO, -( SP sSAVE CONTENTS OF RO ON THE STACK. 
GETPRI -(SP) sSAVE PROCESSOR PRIORITY ON STACK. 
TRAP CSGPRI 
MOV RO, -(SP) 
SETPRI OPRIO7 IGNORE ANY INTERRUPT THAT MAY BE GENERATED. 
MO @PRIO7 RO 


BIC estat a cena 
MOV IESTAT 

SETPRI (SP)- 

MOV (SP )+,RO 
RTS PC 


Vv 
TRAP CSSPRI 
sCLEAR RX.INT.ENBL BIT IN IESTAT. 
sDISABLE RX INTERRUPT 
sENABLE INTERRUPTS TO THE PROCESSOR AGAIN. 
MOV CSP )+,RO 
TRAP C3SPRI 
sRESTORE RO. 


SEQ 9% 


GEBEMPOSPeModtKENC '57 Pan 


4 
3593 022252 
3594 022260 
3595 022266 
3596 022274 


052767 000100 160030 
042767 137677 160022 
016777 160016 157746 
000207 


D8 
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-SBTTL GLOBAL SUBROUTINE - RXIE1 - 

see SEOOSESESEESESESESEEEAREESEEHEHEESEEEEEDOEEEHEDDEEOEEEEEEEEEEEEESEDERESDESSE 
34 - RECEIVER INTERRUPT ENABLE - 

34 THIS ROUTINE IS USED TO ENABLE RECEIVER INTERRUPTS IN THE DHU11. 

3* 

:* INPUTS: NONE . 

3° 

;# OUTPUTS: THE RX. INT.ENBL BIT IS SET IN THE DUT CSR. 

34 IESTST -CONTAINS THE UPDATED STATUS OF THE Tx AND Rx INTERRUPT 

30 ENABLE BITS. 

34 

;@ CALLING SEQUENCE: JSR PC ,RXIE1 

3* 

;* COMMENTS: THE CONTENTS OF THE INDIRECT ADDRESS REGISTER FIELD IN 

34 THE DUT CSR ARE DESTROYED. 

3° 

3# SUBORDINATE ROUTINES CALLED: NONE. 

g-- SHBAEESEAAESELASEESASEESEASEEEEESEAESEEEEEEESEEESEEEREREROEEEEEEEEEEEEESEEEES 


RXIE1:: BIS @BITO6, IESTAT sSET RX. INT.ENBL BIT IN IESTAT. 
BIC #137677, IESTAT ;CLEAR ALL OTHER BITS, EXCEPT Tx AND Rx I.E. 
ars. a sENABLE RX INTERRUPTS. 


SEQ 94 


GEBEME° PuobtaKeNe "St PaRTa 


3621 


022276 
022276 


161474 
160216 
160012 
177400 


002726 


000004 
160164 


E8 
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-SBTTL GLOBAL SUBROUTINE 


- SAVBMP - 


s** SESSSEESEEEEESEEEEESESALEEOEEESEEEEERODASEEEREEAEEEEEEEAREEEEOEEEEDARERESLEEES 


- SA 
THIS ROUTINE SAVES THE PARAMETER PASSED IN, ONTO THE BMP CODE 


SAVE BMP CODES ROUTINE - 
QUEUE 


TOGETHER WITH THE NUMBER OF THE CURRENTLY EXECUTING TEST. 
;* 
;* INPUTS: 


3% 
3 OUTPUTS: 


3% 


3 ¢ 
3# CALLING SEQUENCE: 


74 
;* COMMENTS: 


34 OVERWRITTEN BY ANY SUBSEQUENT ATTEMPTS TO UPDATE THE QUEUE. 
32 
;* SUBORDINATE ROUTINES CALLED: NONE. 
s-- SPERSEASESAEEEASESESEESESEAEAEESEAEEEDEAEEEEAEEEEEDEEEESESEEEAREDOEEEEEEEEE 
SAVBMP:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
MOV BMPCOP ,R4 sGET THE POINTER TO THE NEXT LOCATION IN QUEUE. 
MOVB TSTNUM,CR4)> sSAVE THE CURRENT TEST NUMBER ON THE QUEUE. 
INC R4 s INCREMENT THE POINTER TO GIVE AN EVEN ADORESS. 
BIC #177400 ,R2 sCLEAR THE UNWANTED BITS FROM THE BMP CODE. 
MOV R2,(R4)> sSAVE THE BMP CODE ON THE QUEUE. 
CMP R4 , OBMPCQE sCHECK IF OVERFLOW WILL OCCUR THE NEXT TIME. 
BLO es 3GO SAVE THE POINTER IF WE WILL NOT OVERFLOW. 
SUB 84 RA sRESET THE POINTER TO THE LAST LOCATION IN QUE. 
2s: MOV R4,BMPCQP sSAVE THE POINTER. 
60$: PASS sRESTORE GPRS. 
ays ve JSR PC ,.3(SP)> sRETURN TO PREGOS SUBRT. 


Re - CONTAINS THE BMP CODE THAT IS TO BE PLACED ON THE QUEUE. 
BMPCQP - CONTAINS ADDRESS OF NEXT LOCATION IN THE BMP QUEUE. 
BMPCQB - LABEL AT BASE OF THE BMP CODE QUEUE. 

BMPCGE - LABEL OF NEXT LOCATION AFTER THE END OF THE BMP QUEUE. 
TSTNUM - CONTAINS THE NUMBER OF THE CURRENT TEST. 


BMPCQP - INCREMENTED By 4. 
THE CONTENTS OF THE BMP CODE QUEUE ARE UPDATED. 


JSR PC, SAVBMP 
IF THE OVERFLOW OCCURS THEN THE LAST LOCATION WILL BE 


SEQ 95 


CZDHUBO DHU-11 FUNC TST PARTI 
GLOBAL S\BROUTINE 


3635 
36 


022416 
022416 
022420 


004567 
012704 
004767 


012701 


012703 
5301 


052525 
157644 


157652 
000017 


F8 
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- SKPSTS - 


-SBTTL GLOBAL SUBROUTINE - SKPSTS - 
FHF SOESEEESSESESEEESESEOESESEEEASEDEBEEEEREEADEESARERODAEEEEEEDEAEDEADEDADADELS 
:¢ - SKIP SELF TEST ROUTINE - 
;* THIS SUBROUTINE IS USED TO SKIP THE SELFTEST AFTER A DUT RESET HAS BEEN 


34 INITIATED. IT MUST BE ENTERED IMMEDIATELY AFTER SETTING THE DUT MASTER 
:¢ RESET ROUTINE OR AFTER THE EXECUTION OF A BUS RESET (BECAUSE OF TIMING 
;* CONSIDERATIONS). 

a 

;* INPUTS: CSRA - CONTAINS ADDRESS OF THE DUT CSR. 

34 TXBFCA - CONTAINS ADDRESS OF DUT DMA BUFFER COUNT REGISTER. 

34 

;# OUTPUTS: SKIP SELF TEST CODES ARE WRITTEN TO THE DUT REGISTERS. 


34 
3* CALLING SEQUENCE: JSR PC,SKPSTS 
& 


: 

:* COMMENTS: 

3* 

;* SUBORDINATE ROUTINES CALLED: DELAY. 


$-- SPRRESEEEAEESESESERELEAEEEEAEAEEORESEEEEADEEASEEALEAESEASEEEREREEADAEEEEDERE 


SKPSTS:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 
MOV 010. ,R4 sPASS DELAY VALUE OF 10 MILLI-SECONDS. 
JSR PC ,DELAY sDELAY FOR 10 MILLI-SECONDS. 


3 * 
s WRITE SKIP SELF-TEST CODE (52525) TO ALL THE INDEXED DUT REGISTERS. 


ie 
MOV ONUMLNS!BITOS.R1 ;FORM IND.ADR.REG FIELD (PLUS M.R. BIT) WORD. 
sTHE ABOVE INCLUSION OF THE M.R. BIT IS NECESSARY BECAUSE OF THE 
; LACK OF AM.R. BIT WRITE LOCK-OUT ON THE DHU-11. 
MOV #52525 .R3 sINITIALISE THE SKIP SELF-TEST CODE. 
4$;: DEC Ri sSELECT THE NEXT SET OF DEVICE REGISTERS. 
MOV CSRA,R4 3GET THE ADDRESS OF THE CSR OF THE DUT. 
MOV R1,CR4)> sSELECT A BANK OF DUT REGISTERS. 
6$: MOV R3,CR4)> sWRITE THE CODE TO A DUT REGISTER. 
CMP R4,TXBFCA sCOMPARE POINTER WITH LAST REGISTER ADDRESS. 
BLO 6$ s;LOOP IF NOT ALL REGS DONE IN THIS BANK. 
BIT #17,R1 sTEST FOR IND.ADR.REG FIELD DECREMENTED TO O. 
BNE 4$ sLOOP UNTIL ALL REGISTERS CONTAIN THE CODE. 


sRESTORE GPRS. 
JSR PC ,@(SP)+ 


60$: PASS 
RTS PC 


sRETURN TO PREGOS SUBRT. 


SEQ 96 


GEBEMPOSPHobtafANC 57 Pant 


99 022422 


022424 


022466 
022470 


010046 


010146 


002450 


G8 
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-SBTTL GLOBAL SUBROUTINE 


;* 


34 THE CONTENTS OF THE NUMB 


- SWAPO - 

FOF SEBEAESESESESEEEAASESERERESESEREREREEREAAEEDAAAEEEEEDEEEEREEAEEE DEAE DESEEES 
SWAP GPRS WITH GPR SET O ROUTINE - 

;4 THIS SUBROUTINE SWAPS THE PRESENT CONTENTS OF GPRS R1 THRU RS WITH 


ER ZERO GPR SAVE AREA, 


THE CONTENTS OF RO 


3% ARE NOT ALTERED BY THIS SUBROUTINE. 


GPR CONTENTS Ri THRU RS. 
GPRSOB - LABEL AT BASE OF GPR SAVE AREA NUMBER ZERO. 


R1 THRU RS CONTAIN THE PREVIOUS CONTENTS OF GPR SAVE AREA 
ZERO WORDS 1 THRU S RESPECTIVELY. 

GPRSO - GPR SAVE AREA O WORDS 1 THRU 5, CONTAIN PREVIOUS 
CONTENTS OF GPRS R1 THRU RS RESPECTIVELY. 


37 
;* INPUTS: 
3% 


3* 
34 OUTPUTS: 


3% 
;* CALLING SEQUENCE: 
s 


$ 
;* COMMENTS: 


JSR 


PC, SWAPO 


THE STATE OF THE CARRY FLAG IS NOT ALTERRED BY THIS ROUTINE. 
3; 
;* SUBORDINATE ROUTINES CALLED: NONE. 


g-- SPESEERARERERERSEEASASEEESEROAREEEEEEEEEAEALARAEAEREREAEAEEEEEDEARAL ERE EEDEES 


;SAVE THE CONTENTS OF RO. 


FROM THE GPR SAVE AREA O. 


sSAVE THE CONTENTS OF R1. 
sSAVE THE CONTENTS OF Ro. 
sSAVE THE CONTENTS OF R3. 
sSAVE THE CONTENTS OF R4. 
sSAVE THE CONTENTS OF RS. 


3GET THE 
3LOAD Ri 
;LOAD R1 
sLOAD Ri 
;LOAD Ri 
sLOAD Ri 


sLOAD GPR SAVE AREA O WORD 
:LOAD GPR SAVE AREA O WORD 
A O WORD 


BASE ADDRESS OF GPR SAVE AREA O. 


WITH GPR SAVE AREA O WORD 1. 
WITH GPR SAVE AREA O WORD 2. 
WITH GPR SAVE AREA O WORD 3. 
WITH GPR SAVE AREA O WORD 4. 
WITH GPR SAVE AREA O WORD 5S. 


S WITH SAVED RS. 
4 WITH SAVED R4. 
3 WITH SAVED R3. 


ARE 
sLOAD GPR SAVE AREA 0 WORD 2 WITH SAVED R2. 
sLOAD GPR SAVE AREA O WORD 1 WITH SAVED R1. 


sRESTORE THE INITIAL VALUE OF RO. 


SWAPO:: MOV RO, -(SP) 
& 

; LOAD THE STACK FROM THE GPRS. 

iz MOV —-R1, -( SP) 
MOV R2, -C(SP) 
MOV R3,-C(SP) 
MOV R4,-(€SP) 
MOV RS, -CSP) 

> 

} LOAD THE GPRS 

Be 
MOV &GPRSOB , RO 
MOV CRO)+,R1 
MOV CRO)+,R2 
MOV CRO)+,R3 
MOV C(RO)+,R4 
MOV CRO)+,RS 

; LOAD THE GPR SAVE AREA O FROM THE STACK. 

Be 
MOV (SP)+,-CRO) 
MOV (SP)+,-CRO) 
MOV (SP )+,-CRO) 
MOV (SP )+,-CRO) 
MOV (SP )+, -(RO) 
RTS PC 


SEQ 97 


EBENPOSPuMdt ANC TST Panes 


3751 022472 


022533 123 
022536 105 
022541 117 
022544 106 
022547 116 
022552 

022555 111 
022560 

022563 123 
022566 105 
022571 103 
022574 111 


3757 
3758 022600 
004736 


022600 
3759 022602 000207 


004567 161300 
012701 022514 
012767 016526 


H& 
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.SBTTL GLOBAL SUBROUTINE - TSABRT - 

FHF MERAEEEERESESERESEAEASEREAEEASEREEEEEEDAEDEEEAEAEEREREREDERSAEEAEEABEDDEEEES 
:* - TEST ABORT ROUTINE - 

34 THIS SUBROUTINE IS USED WHEN A NON-TEST RELATED ERROR HAS BEEN FOUND 

:* DURING THE EXECUTION OF THE CURRENT TEST. 

;* saaktahe TO INFORM THE OPERATOR THAT THE CURRENT TEST HAS BEEN 


: ERRMSG - CONTAINS THE NAME OF THE CURRENT TEST. 
;* ERRNBR - CONTAINS THE CORRECT ERROR NUMBER. 
34 THE REMAINDER OF THE ERRTBL IS CORRECTLY INITIALISED. 
MESSAGES ARE REPORTED TO THE OPERATOR. 


PC, TSABRT 


34 
;* OUTPUTS: 
ve CALLING SEQUENCE: JSR 
a COMMENTS: 

7 SUBORDINATE ROUTINES CALLED: ER1603. 


$-- SERESAEEAOESEEAERESASASABASAEAEEAEDREEEAAASHESHEEEEEEEAAEDRAADEDESEEEEEEDEES 


TSABRT:: SAVE 3SAVE CONTENTS OF GPRS RO THRU RS. 


JSR RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 
MOV #2$,R1 sPASS ADDRESS OF FIRST MESSAGE TO BE REPORTED. 
MOV ®ER1603,ERRBLK ;SET-UP THE ERROR REPORTING ROUTINE. 
ERROR ; >>>>> ERROR <<<cc, 
TRAP CSERROR 
BR 60$ H 
2s: -ASCIZ / NON-RELATED TEST ERROR FOUND DURING TEST EXECUTION/ 


sRESTORE GPRS. 
JSR PC,a( SP)» 


PASS 
RTS PC 


sRETURN TO PREGOS SUB6RT. 


SEQ 9A 


GEBSHP Pano hehe TST Pama 


022670 
022670 
022674 


022676 


161166 


000001 
157434 


000020 
157454 


157400 


000200 


000014 


18 
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- TXDSBL - 


-SBTTL GLOBAL SUBROUTINE - TXDSBL - 


;**¢ SESESESESESESESESESESEEESESEASEREERAEALEEEDRHOEEEEEROEEEEEEED EOE EAEESESELSE 


on - TRANSMITTER DISABLE - 
36 THIS SUBROUTINE IS USED TO DISABLE TRANSMISSION ON SELECTED LINES BY, 

34 CLEARING THE ASSOCIATED TX.ENABLE BIT ON THE DUT. 

;* 

;# INPUTS: RS_- BIT'S SET CORRESPOND TO LINES ON WHICH TO CLEAR TX.ENABLE. 
36 CSRA - CONTAINS THE ADDRESS OF THE DUT CSR. 

34 TESTAT - CONTAINS THE STATE OF TXIE AND RXIE BITS IN THE CSR. 
34 NUMLNS - EQUATED TO BE THE MAXIMUM NUMBER OF LINES AVAILABLE. 
34 TXAD2A - CONTAINS THE ADDRESS OF THE TBUFFAD2 REGISTER. 

34 

;# OUTPUTS: RS - BIT'S SET INDICATE THE INITIAL STATES OF ALL TX.ENBLE BITS. 
34 TBUFFAD2 - THE STATE OF THE TX.ENBLE BIT MAY BE ALTERED. 

;¢ THE CONTENTS OF THE IND.ADD.REG FIELD IN THE CSR ARE DESTROYED. 
3; 

;* CALLING SEQUENCE: JSR PC, TXOSBL 

3% 

;* COMMENTS: 

34 

3# SUBORDINATE ROUTINES CALLED: NONE. 

$-- SESSSASEAEAESAEEEASERASEEESEEEEEEEEEESEEEEAEEERESEEEEEEEEEEEEEEDEEEEDEEEEES 


TXDSBL:: SAVE 


JSR 
MOV RS.RO 
MOV oBITO,R1 
MOV TXAD2A,R2 


sSAVE CONTENTS OF GPRS RO THRU RS. 

S,PREGOS ;CALL REGISTER SAVE SUBRT. 

sCOPY BIT MAP OF LINES TO DISABLE TRANSMISSION. 

sINITIALIZE THE SELECTED LINE BIT MASK. 

sGET THE ADDRESS OF THE TBUFFAD2 REGISTER. 

INC R2 ;sGET THE ADDRESS OF THE MSBYTE OF TBUFFAD2 REG. 
ONUMLNS ,R3 sGET MAXIMUM LINE NUMBER PLUS ONE. 

MOV IESTAT ,R4 sGET THE STATES OF THE INT ENABLE BITS. 

CLR R5 sLOG POSSIBLE TX DISABLED ON ALL LINES. 


3¢ 
; SELECT EVERY LINE IN TURN, AND LOG THE STATE OF EACH TX.ENABLE BIT. 


2$: MOV R4,aCSRA sWRITE TO DUT CSR TO SELECT LINE REGISTERS. 
TSTB (Re) sCHECK STATE OF TX.ENABLE BIT ON SELECTED LINE. 
BPL 4% 3SKIP NEXT INSTRUCTION IF TX.ENABLE CLEAR. 
BIS R1,R5 sLOG TX ENABLE BIT SET FOR SELECTED LINE. 


oo 


3 

; CLEAR TX.ENBLE ON LINES THAT HAVE A CORRESPONDING BIT SET IN THE TX DISABLE 
s CLINE BIT MAP. 

o 

$ 


4$: BIT R1,RO sCHECK STATE OF DISABLE LINE BIT MAP. 
BEQ 6$ sBRANCH IF THIS LINE TO REMAIN UNALTERED. 
BICB #BIT7,(R2) ;CLEAR TX.ENABLE BIT ON SELECTED LINE. 
63: INC R4 sPREPARE TO SELECT REGISTERS FOR NEXT LINE. 
ASL R1 ;SHIFT BIT MAP FOR NEXT LINE. 
DEC R3 ;DECREMENT LINE NUMBER. 
BNE 2$ sLOOP TO CHECK NEXT LINE. 
60$: PASS RS sRESTORE GPRS,EXCEPT 
MOV RS,RSSLOT(SP) ;PUT RS IN STACK SLO’. 
JSR PC ,.a(SP)- ;RETURN TO PREGOS SUR’. 
:RS5 - PREVIOUS STATES OF ALL TX.ENABLE BITS. 
RTS PC 


SEQ 99 


GZORBO Dea LE EYNC TST PARTI 


022700 
022700 
022704 
022706 
022712 
022716 
022720 
022724 
022730 


022732 


022742 


022744 
022746 
022750 
022754 
022756 
022760 
022762 


022764 


022764 
022770 


022772 


161072 


000001 
157340 


000020 
157360 


157304 


000200 


000014 


J& 


MACRO M1200 15-MAR-84 09:15 PAGE 77 
A KENBL 


-SBTTL GLOBAL SUBROUTINE 
FHF SESSOSEOEESSEESEESESEAEEAEEEDESEEEEERERAOEEEEEEREDREEAAEDEEDEEADREEDEEEEEDEEES 
- TRANSMITTER ENABLE - 

THIS SUBROUTINE IS USED TO ENABLE TRANSMISSION ON SELECTED LINES Br 
SETTING THE ASSOCIATED TX.ENABLE BIT ON THE DUT. 


34 
3% 
;¢ 


3% 
;¢ INPUTS: 


34 TBUFFAD2 - THE STATE OF THE TX.ENBLE BIT MAY BE ALTERED. 
;f THE CONTENTS OF THE IND.ADD.REG FIELD IN THE CSR ARE DESTROYED. 
32 
;* CALLING SEQUENCE: JSR PC, TXENBL 
;* 
;* COMMENTS: 
;¢ 
;* SUBORDINATE ROUTINES CALLED: NONE. 
$-- SESSASEHASSEHAEREEEASECESEEEEEEEAAEASEESEESESEEERESEEEREEEEEEEEOREEEEEEEEEES 
TXENBL:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 
MOV RS,RO ;COPY BIT MAP OF LINES TO ENABLE. 
MOV @BITO,R1 sINITIALIZE THE SELECTED LINE BIT MASK. 
MOV TXAD2A .R2 ;GET THE ADDRESS OF THE TBUFFAD2 REGISTER. 
INC R2 sGET THE ADDRESS OF THE MSBYTE OF TBUFFAD2 REG. 
MOV @NUMLNS ,R3 ;GET MAXIMUM LINE NUMBER. 
MOV IESTAT,R4 sGET THE STATES OF THE INT ENABLE BITS. 
CLR RS ;CLEAR TX.ENABLE BIT LOG OF DISABLED LINES. 
; SELECT EVERY LINE IN TURN.AND LOG ANY TX.ENBLE BIT THAT IS CLEAR. 
ne 
2s: MOV R4,@aCSRA sWRITE TO DUT CSR TO SELECT LINE REGISTERS. 
TSTs CR2) sCHECK STATE OF TX.ENABLE BIT ON SELECTED LINE. 
BMI 4$ sSKIP NEXT INSTRUCTION IF TX.ENABLE SET. 
BIS Ri,RS sLOG TX ENABLE BIT CLEAR FOR SELECTED LINE. 
3° 
; SET TX.ENBLE ON LINES THAT HAVE A CORRESPONDING BIT SET IN THE Tx ENABLE 
; LINE BIT MAP. 
2 > 
4$: BIT R1,RO0 sCHECK STATE OF TX.ENABLE LINE BIT MAP. 
BEQ 6% sBRANCH IF THIS LINE TO REMAIN UNALTERED. 
BISB OBIT7,(R2) sENABLE TRANSMISSION ON SELECTED LINE. 
6$: INC Ra sPREPARE TO SELECT REGISTERS FOR NEXT LINE. 
ASL Ri ;SHIFT BIT MAP FOR NEXT LINE. 
DEC R3 ;DECREMENT LINE NUMBER. 
BNE 2% sLOOP TO CHECK NEXT LINE. 
605: PASS RS sRESTORE GPRS,EXCEPT 
MOV RS.RSSLOTCSP) ;PUT RS IN STACK SLOT. 
JSR PC ,.@(SP)-+ ;RETURN TO PREGOS SUBRT. 
sRS - LINE BIT MAP CORRESPONDING TO THE 
: ; PREVIOUS LINES THAT WERE DISABLED. 
RTS Pp 


34 
:@ OUTPUTS: 


- TXENBL - 


RS_- BIT'S SET CORRESPOND TO LINES ON WHICH TO SET TX.ENABLE. 
CSRA - CONTAINS THE ADDRESS OF THE DUT CSR. 

IESTAT - CONTAINS THE STATE OF TXIE AND RXIE BITS IN THE CSR. 
NUMLNS - EQUATED TO BE THE MAXIMUM NUMBER OF LINES AVAILABLE. 
TXAD2A - CONTAINS THE ADDRESS OF THE TBUFFAD2 REGISTER. 


RS - BIT'S SET INDICATE PREVIOUSLY DISABLED LINES. 


SE Q 1 Ow 


3888 022774 
3889 022776 


3890 023002 


0 
3894 023030 
3895 023032 


CC BB KPO SPBROOtINENS TST PART 


010046 


104440 
010046 


012700 
104441 
042767 
016777 


012600 
104441 
012600 
000207 


000340 


177677 157272 
157266 157216 


K8 
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- TXIEO ~ 


-SBTTL GLOBAL SUBROUTINE - TXIEO - 


3¢* SOSAEAEEEEAEEEEEESESEAEREREEESEREEREEEREAEERAEEEAEEERERE REREAD EEEEEEEEEEEES 


;¢ - TRANSMITTER INTERRUPT DISABLE - 
;* THIS ROUTINE IS USED TO DISABLE TRANSMITTER INTERRUPTS IN THE DHU11. 
3; 
;* INPUTS: NONE . 
34 
;* OUTPUTS: THE TX.INT.ENBL BIT IS CLEARED IN THE DUT CSR. 
3% IESTST -CONTAINS THE UPDATED STATUS OF THE TX AND RX INTERRUPT 
;* ENABLE BITS. 
;* 
;# CALLING SEQUENCE: JSR PC, TXIEO 
;* 
:* COMMENTS: THE CONTENTS OF THE INDIRECT ADDRESS REGISTER FIELD IN 
34 THE DUT CSR ARE DESTROYED. 
3 
;* SUBORDINATE ROUTINES CALLED: NONE. 
$-- SEREREEEEEAEREEEEAAEREAAEERESAEEAESESEEEEEAEEEEEEEEADAEEEEEAEEDEDEEREEERELES 
TXIEO:: MOV RO, -CSP) ;SAVE CONTENTS OF RO ON THE STACK. 
GETPRI -(€SP) ;SAVE CURRENT PROCESSOR PRIORITY ON THE STACK. 
TRAP C$GPRI 
MOV RO, -( SP) 
SETPRI OPRIO7 ; IGNORE ANY INTERRUPTS THAT MAY BE GENERATED. 
MOV #PRIO7 RO 
TRAP CsSPRI 
BIC #177677,IESTAT ;CLEAR TX.INT.ENBL BIT IN IESTAT. 
MOV IESTAT,@CSRA ;sDISABLE TX INTERRUPTS. 
SETPRI (SP)->+ sENABLE INTERRUPTS TO THE PROCESSOR AGAIN. 
MOV CSP )+,RO 
TRAP CSSPRI 
MOV (SP )+,RO sRESTORE RO. 
RTS PC 


SEQ 101 


CZ0HUBO DHU-11 FUNC TST PARTI 


L8 
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GLOBAL SUBROUTINE - TXIE1 - 


3916 023034 
3917 023042 
3918 023050 
3919 023056 


052767 040000 157246 
042767 137677 157240 
016777 157234 157164 
000207 


-SBTTL GLOBAL SUBROUTINE - TXIE1 - 

see SERAEREEEEEREAEEEESEREEREEEAAEEERERAEDAEEEEAAEEEEAEDREAEEDAREAEDEEEREEEEAEES 
34 - TRANSMITTER INTERRUPT ENABLE - 

54 THIS ROUTINE IS USED TO ENABLE TRANSMITTER INTERRUPTS IN THE OHU11. 

;* 

;* INPUTS: NONE . 

34 

;* OUTPUTS: THE TX.INT.ENBL BIT IS SET IN THE DUT CSR. 

34 IESTST -CONTAINS THE UPDATED STATUS OF THE Tx AND Rx INTERRUPT 
;* ENABLE BITS. 

;* 

;* CALLING SEQUENCE: JSR PC, TXIE1 

;* 

;* COMMENTS: THE CONTENTS OF THE INDIRECT ADDRESS REGISTER FIELD IN 

34 THE DUT CSR ARE DESTROYED. 

;* 

;* SUBORDINATE ROUTINES CALLED: NONE. 

3-- SPRRAREDEREAESESESEERERABEEEEERERAEEERAEAEAERAAAEAEAEAEREAREAEEESEAEEAEBR ES ESEES 


TXIE1:: BIS #B61T14,IESTAT sSET TX.INT.ENBL BIT IN IESTAT. 
BIC #137677, IESTAT ;CLEAR ALL BITS EXCEPT TX Rx I.E BITS. 
ara” a ee sENABLE TX INTERRUPTS. 


SEQ 102 


EEBERPOSPEMaH RANE TST PART 


023060 
023060 


023064 


023066 
950 023070 


223072 
023076 


023110 


3964 023114 


023132 
023134 


004567 


010204 
160104 
103403 
012701 
000442 


012603 
012602 


160712 


177777 


000020 
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MNONSD IV 


M8 


SEQ 103 


-SBTTL GLOBAL SUBROUTINE - UNSDIV - 


sof SERREEEEEEEEEEEEEEAEEABRADESRERERAREEEAEEEAREAAEEEEAAEEAEEEAEEREREA EERE EA EEE 


3:4 UNSIGNED DIVIDE ROUTINE - 


3¢ THIS SUBROUTINE IS USED TO DIVIDE A 32 BIT UNSIGNED DIVIDEND BY A 

;* 16 BIT UNSIGNED DIVISOR GIVING A 16 BIT QUOTIENT. ALL NUMBERS ARE 

7 CONSIDERED TO BE UNSIGNED. A SUCCESS FLAG IS NOT SET ON RETURN IF 

3 * THE QUOTIENT WAS TOO BIG TO BE CONTAINED IN 16 BITS. 

;* INPUTS: Rl - THE DIVISOR, UNSIGNED, 16 BITS. 

3% R2 - MOST SIGNIFICANT WORD OF THE DIVIDEND, UNSIGNED, 16 BITS. 
34 RS - LEAST SIGNIFICANT WORD OF THE DIVIDEND, UNSIGNED, 16 BITS. 
7% 

;* OUTPUTS: Ri - QUOTIENT, UNSIGNED, 16 BITS (177777 IF OVERFLOW). 

;4 CARRY - SUCCESS FLAG, SET IF COMPLETE QUOTIENT FITS IN 16 BITS. 
3% 

;* CALLING SEQUENCE: JSR PC,UNSDIV 

3* 

;* COMMENTS: IF THE DIVISOR IS O THE QUOTIENT IS RETURNED AS ALL ONES 

34 (177777) AND THE CARRY IS CLEAR REGARDLESS OF THE DIVIDEND. 


;* 
;# SUBORDINATE ROUTINES CALLED: NONE. 


3-- SRAEAASESASEAAERESESLABAAERERERESEAEDEEAEREAAEEERSESEEDEDREDEEEEEREEDAREREEERORS 


UNSDIV:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 


3;* 
; CHECK FOR QUOTIENT GREATER THAN 16 BITS CONDITION. 
2 = 


MOV R2,R4 ;GET MSW OF DIVIDEND FOR SUBTRACT. 
SUB R1,R4 ;SUBTRACT DIVISOR FROM MSW OF DIVIDEND. 
BCS es sIF IT DIDN’T GO, WE HAVE QUOTIENT < 16 BITS. 


3SET QUOTIENT TO ALL ONES (177777), 
sEXIT WITH CARRY CLEAR. 


3;* 
; SET UP COUNTERS AND VARIOUS WORKING GPRS. 


MOV #-1,R1 
BR 60$ 


3: 
2s: CLR R4 sCLEAR THE LSW OF THE DIVISOR. 
CLC ;CLEAR CARRY FOR THE SHIFT OF THE DIVISOR. 
ROR R1 ; DIVISOR By 
ROR R4 ; 2CUNSIGNED) 
MOV #16. ,RO 3SET UP INITIAL SHIFT COUNT TO 16. 
;* 
; THE SUBTRACT AND SHIFT LOOP. 
5 = 
4$: MOV Re, -CSP) 3SAVE MSWORD OF DIVIDEND. 
MOV R3,-(SP) ;SAVE LSWORD OF DIVIDEND. 
SUB R4, sLSWORD DIVIDEND - LSWORD OF DIVISOR. 
SBC Re sMSWORD DIVIDEND - . 
6CS 6$ :If BORROW FROM BORROW SUBTRACT, IT DIDN'T GO. 
R1,Re2 sMSWORD DIVIDEND - MSWORD OF DIVISOR 


SUB . 
BCC 8$ :;IF NO BORROW, IT WENT, CARRY IS CLEAR. 


& 
: IT DION'T GO, SO WE SHIFT A 1 INTO THE QUOTIENT (COMPLEMENTED LATER). 
; CARRY IS SET. 
;= 
6$: MOV d+, R3 


(SP sRESTORE LSWORD OF DIVIDEND. 
MOV (SP )+,R2 


;RESTORE MSWORD OF DIVIDEND. 


CEBBRPOSPBROOHINENS "ST PART! 


023136 
8 


4010 
4011 
4012 
4013 


4014 
4015 


023140 


023142 


023170 


023172 
023174 
023176 


023200 
023202 


023204 
023204 
023210 
023212 


000401 
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sYONSD 


Iv - 


8$: 


10$: 


3;¢ 


N8& 


SEQ 104 


10$ sGOTO SHIFT 1 INTO THE QUOTIENT. 


; IT WENT, SO WE RESTORE THE STACK AND von A O INTO QUOTIENT (WILL BE 


; COMPLEMENTED LATER). 


a. 
MOV 


3;* 
; SHIFT 
= 


THE 


CARRY IS CLEAR 


C(SP)+,(SP)-+ ;POP THE SAVED DIVIDEND OFF OF THE STACK. 

RESULT OF THE SUBTRACT ATTEMPT INTO THE QUOTIENT SHIFT REG. 

RS ;SHIFT NEXT BIT INTO THE INVERTED QUOTIENT. 
; DIVIDE THE 

R1 ; ghie BY 

R4 ; 2@ CUNSIGNED). 

RO ;COUNT THIS SHIFT AND SUBTRACT. 

4$ ;LOOP FOR ANOTHER SHIFT € SUB IF NOT DONE. 

RS ;GET QUOTIENT FROM INVERTED QUOTIENT. 


ROUND UP OR LEAVE QUOTIENT ALONE. 
sCLEAR THE CARRY FOR THE SHIFT OF THE DIVIDEND. 


RS sMULTIPLY LSWORD OF DIVIDEND By 2, MSWORD IS 0. 
le$ ;IF CARRY FROM SHIFT, ROUND UP. 

R4 ,R3S ; SUBTRACT ag og: FROM DIVIDEND. 

14$ ;IF BORROW, DON’T ROUND UP. 


RS ; INCREMENT THE QUOTIENT BY ONE. 
14$ ; IF 7 OVERFLOW, WE LEAVE THE ROUND UP. 
RS ;DON'T LET ROUNDING CAUSE OVERFLOW. 


PASS QUOTIENT AND EXIT. 


sPASS QUOTIENT BACK IN R1. 
s INDICATE NO OVERFLOW. 


Ri sRESTORE GPRS, LEAVE THE FOLLOWING INTACT: 


RS.R1 


MOV R1,RiISLOTCSP) sPUT R1 IN STACK SLOT. 
JSR PC ,@CSP)-+ ;RETURN TO PREGOS SUBRT. 
;R1 - 16 BIT, UNSIGNED QUOT TIENT, 
PC ;CARRY - SET INDICATES NO OVERFLOW (SUCCESS). 


CZ0HUBO 


GLOBAL 


OMU -11 


SiUBROUTI 


023214 


FUNC TST PARTI 
NE 


bY 
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-SBTTL GLOBAL SUBROUTINE - WAIBIC - 


ee SPOSSSSEEOSESSESESEEESESESEEESEOESEEEEOEOEOEEESEOEAEEEEEEEEESOEEEEEEDEOEEESEES 


- - WAIT FOR BIT CLEAR ROUTINE - 

;¢ THIS SUBROUTINE WAITS FOR THE SPECIFIED BIT TO BECOME CLEAR. IF THE 
:¢ SPECIFIED BIT GOES TO A CLEAR STATE WITHIN THE SPECIFIED TIME -OuT 

3¢ PERIOD A SUCCESS INDICATION IS RETURNED BY THIS ROUTINE. 

3@ THE LAST VALUE WHICH IS READ LOOKING FOR THE CONDITION IS RETURNED TO 
3@ ALLOW THE USE OF THIS ROUTINE TO LOOK FOR DESTRUCTIVE READ CONDITIONS. 
34 

3@ INPUTS: Ri - TIME-OUT VALUE AND BIT NUMBER INDICATION: 

;¢ BITS 15 THRU 12 - NUMBER OF BIT TO TEST (RANGE 0 THRU 1S). 
3@ BITS 11 THRU O - TIME-OUT VALUE IN MILLI-SECONDS (4095 Max). 
ie R2 - ADDRESS OF WORD CONTAINING THE BIT TO TEST. 

3° 

:¢ OUTPUTS: Re - THE LAST WORD WHICH WAS READ TO CHECK FOR THE CONDITION. 
36 CARRY - SUCCESS FLAG (CARRY SET IF BIT CLR BEFORE TIME -OUT). 
3° 

3* CALLING SEQUENCE: MOV 0130040,R1 sPASS BIT 11 (13 OCTAL) AND 


3¢ s 32 (40 OCTAL) MS DELAY. 
3° MOV OLABEL ,R2 sTEST BIT IN WORD AT “LABEL”. 
34 JSR PC ,WAIBIC sWAIT 32 MS FOR BIT 11 TO CLR. 


& 

3¢ COMMENTS: 

;¢ 

s@ SUBORDINATE ROUTINES CALLED: MSLGET. 


-- SSSSSOSSOSEESHESESESEOSESESESEEEOESEOESHEEHEEEEEHEEEEEEOEEEEEEEESEEEEEEEEES 


WAIBIC:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
a R2,R4 3SET UP THE ADDRESS PARAMETER FOR MSLGET. 
BIC #170000,R1 


BIC @7777,R2 
Re 


ASR R2 
ASE Re 3 


R2 
MOV BITTEL(R2),R2 OF LINE TO TEST FROM TABLE. 

CLR R3 sINDICATE THAT THE BIT SHOULD BE CLR. 

JSR PC .MSLGET sWAIT FOR THE BIT TO BE CLR iy FA ale 


MOV RO,R2 sPASS LAST VALUE READ AS OUTPUT PARAMETER 
60%: PASS R2 ST GPRS, EXCEPT THE FOLLOWING: 
MOV R2,R2SLOTC sPUT R2 IN STACK SLOT. 
JSR PC .a(SP)- sRETURN TO PREGOS SUBR’. 
3 R2 - LAST VALUE READ LOOKING FOR CONDITION. 
RTS Pc s CARRY - SUCCESS FLAG (SET IF BIT FOUND CLR). 


SEQ 105 


CS 
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4005 -SBTTL GLOBAL SUBROUTINE - WAIBIS - 
4064 gee eaaueggrnenneegeasnen” x. | (eee 
4065 s¢ AIT FOR BIT SE POUT ING 
4066 3¢ THIS SUBROUTINE WATTS FOR THE SPECIF ED BIT “TO BECOME SET. IF THE 
406” 3° SPECIFIED BIT GOES TO A SET STATE WITHIN THE aeeee TED TIME -OuT 
4068 :* PERIOD A SUCCESS INDICATION IS RETURNED BY THIS R 
4069 14 THE LAST VALUE WHICH AD LOOKING FOR THE C TT ION is RETURNED T 
sort 3@ ALLOW THE USE OF THIS ROUTINE TO LOOK FOR DESTRUCTIVE READ CONDITIONS. 
: 
4072 3@ INPUTS: Ri - TIME-OUT VALUE AND BIT NUMBER INDICATION: 
4073 fT) BITS 15 THRU 12 - NUMBER OF BIT TO TEST CRANGE O THRU 15 
4074 34 BITS 11 THRU O - TIME-OUT VALUE IN MILLI re (4095 MAx) 
pr tt 36 R2 - ADDRESS i WORD CONTAINING THE BIT TO T 
,* 
4077 3¢ 
4078 :@ OUTPUTS: Re - THE LAST WORD WHICH WAS READ TO CHECK FOR THE CONDITION. 
ahae s¢ CARRY - SUCCESS FLAG (CARRY SET IF BIT SET BEFORE TIME-OuT). 
34 
40861 s@ CALLING SEQUENCE; MOV #130040,R1 sPASS BIT 11 (13 OCTAL) AND 
4082 ;¢ s 82 (40 OCTAL) MS DELAY. 
4083 ,@ MOV OLABEL ,R2 sTEST ETT IN WORD AT “LABEL 
306s 34 JSR PC ,WAIBIS IWATT 32 MS FOR BIT 11 TO Sei. 
34 
sea" 3¢ COMMENTS: 
4046 3@ SUBORDINATE ROUTINES CALLED: MSLGET. 
4089 $+ + SOBSSOOESEOOOEESEOEEEEEOEEEAEORESESODODEEOREOEEEOEDEOEEOOOREREDEOESEEEEEEES 
4090 
4091 023270 WAIBIS:: SAVE 4s*ve CONTENTS OF GPRS RO THRU RS. 
023 004567 160502 JSR GO5 sCALL REGISTER SAVE he 
4092 023274 Ol ° sSET UP THE ADDRESS PARAMETER FOR MSLGET 
4093 023276 010102 R1,R2 
4094 023 2701 170000 @170000,R1 sSEPERATE DELAY COUNT OUT OF PASSED PARAMETER. 
4095 023 042702 007777 @7777,R2 sSEPERATE LINE NUMBER FIELD OF PASSED PARAM. 
4096 023310 000302 He sPUT LINE NUMBER FIELD IN LSBYTE. 
4097 023312 R2 sSMIFT THE LINE NUMBER Kae INTO THE PROPER 
4098 023314 006202 Re s POSITION TO USE IT AS A WORD TABLE OFFSET 
4099 023316 Re s FOR T LOOKUP OF THE LINE BIT MAP, 
4100 023 016202 002410 MOV es geet h2 Ra sGET BIT LINE TO TEST FROM TABLE. 
4101 023324 010203 MOV R2,R3 s INDICATE T 
stak 023326 004767 174632 JSR PC; MSLGE eae A F y ts ¢ 
4104 023332 010002 MOV RO,R2 sense LAST Vv 
4105 023334 608; PASS R2 sRESTORE GPRS, EXCEPT THE FOL 
23334 010266 000006 MOV R2,R2SLOTC SP) sPuT IN STACK SLOT. 
023340 736 JSR PC ,.@(SP)-» sRET 0 GO5 RT. 
4106 s R2 - LAST VALUE READ LOOKING ONDITION. 
4107 023342 000207 RTS PC s CARRY - SUCCESS FLAG (SET IF BIT FOUND SET). 





CE BE WP° RB od? 1 hyeNC TST PART? 


4155 023344 
023344 


38 
ice 023350 


41 
4164 0235352 


004567 160426 


005005 


010204 


DY 
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-SBTTL GLOBAL SUBROUTINE - 


°F SOSSESEEAESESASESESESESEEEEESSFCEAEDESEAEEDEREADEAEEEDEREEEDEREAEEEDESHOEEEEESE 


36 - WRITE DATA PATTERN TO DEVICE REGISTERS - 

;¢ THIS ROUTINE WRITES A ROTATED DATA PATTERN TO EACH OF THE 6 DEVICE 

34 REGISTERS OF EACH ACTIVE LINE OF THE DEVICE UNDER TEST. 

34 THE DATA PATTERN IS ROTATED ONCE AFTER EACH WRITE TO A DEVICE REGISTER 
.6 ON A PARTICULAR LINE. THE STARTING DATA PATTERN FOR EACH LINE 
36 IS ROTATED ONCE AFTER WRITING ALL THE REGISTERS ON A PARTICULAR 
34 LINE. THIS LEADS TO THE FOLLOWING DATA PATTERN: 

av ) LINE 0, REGISTER O - SHIFTED O BIT POSITIONS 

34 LINE 0, REGISTER 1 - SHIFTED 1 BIT POSITION 

3* eee 

34 LINE i, REGISTER O - SHIFTED 1 BIT POSITION 

3¢ LINE 2, REGISTER 1 - SHIFTED 2 BIT POSITIONS 

3¢ ees 

34 ANY BITS FIELOS IN THE DEVICE REGISTERS THAT CANNOT BE ALTERED 

36 ARE MASKED OUT OF THE DATA PATTERN BEFORE IT IS WRITTEN. 

ie THIS ROUTINE WILL USE EITHER MOV, MOVB, BIS, BISB, BIC, OR BICB 

3* INSTRUCTIONS. THE UPPER OR LOWER BYTE CAN BE SPECIFIED FOR WRITING. 
3% 

;@ INPUTS: R2 - USED TO PASS IN THE DATA PATTERN TO BE ROTATED & WRITTEN. 
34 RS - BYTE INDICATOR (- => LO BYTE, + => HI BYTE, O => BOTH). 
34 R4_ - OPERATION TYPE INDICATOR (- => BIC, + => BIS, O => MOV). 
3° ACTLNS - BIT MAP OF THE ACTIVE LINES ON THE DEVICE UNDER TEST. 
34 CSRA - CONTAINS THE CSR ADDRESS OF THE DEVICE UNDER TEST. 

3@ DRADRT - BASE ADDRESS OF DEVICE REGISTER ADDRESS TABLE. 

3% LPRO - EQUATED TO LPR REG OFFSET FROM DEVICE CSR ADORESS. 

3° NUMLNS - NUMBER OF LINES ON THE DEVICE UNDER TEST. 

3¢ TXBFCO - EQUATED TO TBUFFCT REG OFFSET FROM DEVICE CSR ADDRESS. 
26 UNBTTB - BASE ADDRESS OF THE UNUSED BIT TABLE. 

32 

3@ OUTPUTS: DEVICE REGISTERS ON ALL ACTIVE DEVICE LINES ARE MODIFIED. 


& 
s@ CALLING SEQUENCE: JSR PC .WOPOR 

e 

3@ COMMENTS: THIS ROUTINE DOES NOT WRITE DATA TO THE FOLLOWING REGISTERS, 


Hie RXTIMER 
3 STAT 
:4 FIFOSIZE 
3° FIFODATA 
34 THE CSR IS CLEARED EXCEPT FOR THE IND.ADR.REG FIELD. 
3¢ 
3@ SUBORDINATE ROUTINES CALLED: ROLODAP. 
8 ~~ 990808640880 46666046868606860668666868066666006066860086006000086460060068060060080000620868 
WOPDR:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 


s° 
; SET UP OUTER LOOP WHICH WRITES THE DATA PATTERN TO EACH LINE'S REGISTERS 
e CLR oS ;CLEAR LINE COUNTER TO SELECT LINE 0. 


3* 
; THE OUTER LOOP FOLLOWS. EACH PASS THROUGH THIS LOOP WRITES DATA TO ALL OF 
; THE DEVICE REGISTERS FOR A PARTICULAR LINE IF IT IS ACTIVE. 


Be 
2s: MOV R2,R4 sSAVE THE OUTER LOOP DATA PAITERN., 


SEQ 107 


9 
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SEBENEOSPEGbHaSQMC "5 Pants 


4165 023354 010577 156662 MOV R5,@CSRA sSET CSR IND.ADR.REG FIELD TO THIS LINE. 
4166 023360 006305 ASL RS ;TURN LINE NUMBER INTO A WORD OFFSET. 
4167 023362 036567 002410 156640 BIT BITTBL(RS),ACTLNS 
4168 023370 001456 BEQ 203 sLINE ACTIVE? NO, SKIP THIS LINE. 
4169 023372 012701 000004 MOV OLPRO,R1 YES, INITIALIZE THE REGISTER OFFSET. 
3 * 
4171 : THE INNER LOOP FOLLOWS. EACH PASS THROUGH THIS LOOP WRITES DATA TO A 
4i7e ; DEVICE REGISTER. 
, 
4174 023376 010200 4$ MOV R2,RO 
4175 023400 046100 002370 BIC UNBTTBCR1),RO ;CLEAR BIT FIELOS FOR UNUSED REGISTER BITS. 
4176 023404 016103 002242 MOV DRADRT(R1),R3  ;GET THE ADDRESS OF THE DEVICE REGISTER. 
4177 023410 766 0 TST R3SLOT(SP) sCHECK THE OPERAND TYPE INDICATOR. 
4178 023414 003402 BLE Ge sHIGH BYTE? NO, SKIP HIGH BYTE ADDRESS SET UP. 
4179 023416 005203 INC R3 sYES, SET THE REG ADDRESS TO THE HIGH BYTE. 
4180 023420 000300 SWAB RO sMOVE HIGH BYTE DATA INTO THE LOw BYTE. 
4181 023422 005766 000010 6$: TST R3SLOT(SP) sCHECK THE OPERAND TYPE INDICATOR. 
4182 02 001412 BEQ 12$ sWORD ACCESS? YES. GO PERFORM WORD ACCESS. 
3*¢ 
4184 sPERFORM BYTE ACCESS TO THE SPECIFIED BYTE OF THE SPECIFIED REGISTER. 
i 
4186 023430 005766 000012 TST R4SLOT(SP) 3NO, CHECK THE ACCESS TYPE INDICATOR. 
4187 023434 100403 BMI 8s sUSE BIC? YES, GO PERFORM BICB INSTRUCTION. 
4188 023436 001404 BEQ 10$ ;USE MOV? YES, GO PERFORM MOVB INSTRUCTION. 
4189 023440 150013 BISB RO,(R3) ;NEITHER,. PERFORM BISB ACCESS TO REGISTER. 
4190 023442 000415 18$ 
4191 023444 140013 8$: BICB RO,(R3) sPERFORM BICB ACCESS TO REGISTER. 
4192 023446 000413 Bn 18$ 
4193 023450 110013 10$: MOVB RO,(R3) sPERFORM MOVB ACCESS TO REGISTER. 
aie 023452 000411 gR 18% 
3? 
£196 sPERFORM WORD ACCESS TO THE SPECIFIED REGISTER. 
ee 
4198 023454 005766 000012 12$: TST R4SLOT(SP) sCHECK THE ACCESS TYPE INDICATOR. 
4199 023460 100403 BMI 14% sUSE BIC? YES, GO PERFORM BIC INSTRUCTION. 
4200 023462 001404 BEQ 16$ sUSE MOV? YES, GO PERFORM MOV INSTRUCTION. 
4201 02 050013 BIS RO,(R3) sNEITHER. PERFORM BIS ACCESS TO REGISTER. 
4202 023466 000403 Las 
4203 023470 040013 14%: BIC RO,(R3) sPERFORM BIC ACCESS TO REGISTER. 
023472 000401 18$ 
4205 023474 010013 16$: MOV RO,(R3) sPERFORM MOV ACCESS TO REGISTER. 
3° 
4207 ; PREPARE THE DATA PATTERN AND OFFSET FOR THE NEXT REGISTER ON THIS LINE. 
a2 
4209 023476 004767 175766 188: JSR PC ,ROLDAP sROTATE DATA PATTERN LEFT, NOT THROUGH CARRY. 
4210 023502 062701 000002 ADD @2,R1 s INCREMENT OFFSET FOR NEXT REGISTER. 
4211 023 020127 CMP R1,0FSLSO sCHECK IF THIS IS THE FIFOSIZE/DATA REG 
4212 023512 001002 BNE 19$ sAVOID ALTERING THE OFFSET IF IT ISN'T. 
4213 023514 062701 000002 ADD @2,R1 sAVOID TESTING THESE REGISTERS. 
4214 023520 020127 000016 19%: CMP R1,eTXBFCO sCOMPARE REG OFFSET WITH OFFSET OF LAST REG. 
rth 023524 003724 BLE 4$ 3;LOOP IF NOT ALL REG DONE FOR THIS LINE. 
3? 
shia ; BACK INTO THE OUTER LOOP. NOW SET UP FOR NEXT LINE. LOOP IF NOT DONE. 
= 
4219 023526 010402 208 MOV R4,R2 ;SET UP TO ROTATE THE DATA PATTERN. 
4220 023530 004767 175734 JSR PC ,ROLDAP sROTATE THE DATA PATTERN. 
4221 023534 006205 ASR RS sCONVERT BACK TO LINE NUMBER FROM WORD OFFSET. 


GZBENP®PeabtahgNc TST Para 


4222 025536 


> 
4226 0235546 
023546 
4227 023550 
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F9 
RS 
RS, @NUMLNS 
23 


JSR 
PC 


sCOUNT THIS LINE. 
;COMPARE LINE COUNT WITH NUMBER OF LINES. 
;LOOP IF SOME LINES NOT DONE. 


sRESTORE GPRS. 


PC,aCSP)-> sRETURN TO PREGOS SUBRT. 


SEQ 109 


GEBSHP°SPamabh sn TST PART 


023552 
023552 


023556 
023562 
023564 
023566 


023572 


023576 
023576 
023600 


004567 


016701 


004736 
000207 


160220 


156470 


177777 


173656 


G9 
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-SBTTL GLOBAL SUBROUTINE - WTWLNC - 


se SERSEERERESAEELEEBESESEDREREEEEREEEEREREDEOREAEEAAEREREAEEEDR EREDAR MEAERE DEEDS 


;* LINE CONTROL REGISTER SETUP ROUTINE - 


34 THIS SUBROUTINE IS USED TO SET THE DEVICE UNDER TEST (DUT) LINE 

34 CONTROL REGISTERS (LNCTRL) TO THE SPECIFIED STATE. ONLY THE LNCTRLS 
34 FOR THE SPECIFIED LINES ARE ALTERED. 

34 

;* INPUTS: RO - NEW LINE PARAMETERS. 

34 RS - BIT MAP OF LINES TO BE ALTERED. 

24 CSRA - CONTAINS ADDRESS OF THE DUT CSR. 

34 IESTAT - CONTAINS THE CURRENT STATE OF THE Tx AND Rx INTERRUPT 
34 ENABLE BITS IN THE CSR. 

34 LNCTRA - CONTAINS ADDRESS OF THE DUT LNCTRL REGISTERS. 

34 

;* OUTPUTS: LNCTRL - SPECIFIED DUT LINE CONTROL REGISTERS ARE ALTERED. 

a 


2 
3# CALLING SEQUENCE: JSR PC ,WTWLNC 


34 

;* COMMENTS: 

& 

- SUBORDINATE ROUTINES CALLED: ALTFLD. 


g-- SEAEAESEESASEEERSAREASEAEAEEEEERERESESEREREEAREEORAEADEREEEEREEEEEREDELEDSE e 


WTWLNC:: SAVE sSAVE CONTENTS OF GPRS RO THRU R5. 
JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 


3¢ 
; SET UP THE PARAMETERS FOR THE CALL TO ALTFLD. 


ag 
MOV LNCTRA,R1 ;SET UP THE REGISTER ADDRESS PARAMETER. 
Re sSET UP THE DESIRED REGISTER CONTENTS. 
3SET UP THE BIT MAP OF LINES TO ALTER. 
sSELECT ALL REGISTER BITS TO BE ALTERED. 


3* 
; CALL THE SUBROUTINE WHICH ALTERS THE REGISTER CONTENTS. 
fee 


JSR PC.ALTFLD sALTER THE REGISTER CONTENTS. 
60%: PASS sRESTORE GPRS. 
1. ne JSR PC ,a(SP)-+ ;RETURN TO PREGOS SUBRT. 
S 


SEQ 110 


EEBARESPaMosHtgNe "St Paw 


023602 
023602 


023606 


296 023612 


023614 
023616 


023622 


023626 
023626 
023630 


004567 


016701 


004736 
000207 


160170 


156434 


177777 


173626 


ab, 
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-SBTTL GLOBAL SUBROUTINE - WTWLPR - 


;*¢ PESCESEREEEAEESEEEEEEEASESEEEEEESESESEEEEEEEEEEEADREREREEAAEEEEREAAEAREEERAESSS 


;* - LINE PARAMETER REGISTER SETUP ROUTINE - 

;4 THIS SUBROUTINE IS USED TO SET THE DEVICE UNDER TEST (DUT) LINE 

;4 PARAMETER REGISTERS (LPR) TO THE SPECIFIED STATE. ONLY THE LPRS FOR 
:4 THE SPECIFIED LINES ARE ALTERED. 

;* 

3* INPUTS: RO - NEW LINE PARAMETERS. 

;* RS - BIT MAP OF LINES TO BE ALTERED. 

;* CSRA - CONTAINS ADDRESS OF THE DUT CSR. 

:4 TESTAT - CONTAINS THE CURRENT STATE OF THE TX AND Rx INTERRUPT 
:* ENABLE BITS IN THE CSR. 

34 LPRA - CONTAINS ADDRESS OF THE DUT LPR. 

3% 

;* OUTPUTS: LPR - SPECIFIED DUT LINE PARAMTER REGISTERS ARE ALTERED. 

;* 

;* CALLING SEQUENCE: JSR PC ,.WTWLPR 

3* 

;* COMMENTS: 

34 

;* SUBORDINATE ROUTINES CALLED: ALTFLD. 

s-- SPESSASEESEAESEEEASEEESESESEALEAEASEAEEEEEEEEEREAEREAEEERESEAEEEDEAAEAEE LES 


WTWLPR:: SAVE 3 SAVE —* OF GPRS RO THRU RS 


JSR RS,PRE ;CALL REGISTER SAVE SUBRT. 
3° 
; SET UP THE PARAMETERS FOR THE CALL TO ALTFLD. 


ee 
MOV LPRA,R1 ;SET UP THE REGISTER ADDRESS PARAMETER. 
MOV RO,R2 sSET UP THE DESIRED REGISTER CONTENTS. 
MOV RS.R3S ;SET UP THE BIT MAP OF LINES TO ALTER. 
MOV @-1,R4 sSELECT ALL REGISTER BITS TO BE ALTERED. 


3? 
; CALL THE SUBROUTINE WHICH ALTERS THE REGISTER CONTENTS. 
S * 


JSR PC,ALTFLD sALTER THE REGISTER CONTENTS. 
608%: PASS sRESTORE GPRS. 
ate pe JSR PC .a(SP)> ;RETURN TO PREGOS SUBRT. 


SEQ 111 


ZD 


44507 
4308 
4309 
4310 
4311 
4312 
43153 
4314 
4315 
4316 
4317 
4318 
4319 
4320 
4321 


023656 


ATERRLP? SERVICE ROUT INE 


004567 
016701 
005201 
102001 


005301 
010167 


004736 
000002 


PARTI 


160140 
156452 


156440 
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-SBTTL INTERRUPT SERVICE ROUTINE - CACHRx - 


see SPSSSESESEDEEESESEEESESESEEEEEEEEEEEEEEEEEEEEEEEDEEEAEDOREEEEEEERERESEEEEEES 


;* - CATCH RECEIVER INTERRUPT. 

;¢ THIS ROUTINE IS USED IN SEVERAL TESTS,TO LOG A COUNT OF THE 

:¢ NUMBER OF RECEIVER INTERUPTS THAT OCCUR 

6 

“4 INPUTS: CSRA - CONTAINS THE ADDRESS OF THE CSR. 

3¢ RXINTC - HOLDS THE COUNT OF THE NUMBER OF RX INTERRUPTS 
30 THAT OCCURRED. 

;* 

;* OUTPUTS: RXINTC - CONTAINS THE UPDATED INTERRUPT COUNT. 

34 

3; 

;# CALLING SEQUENCE: PUT THE ADDRESS OF THE LABEL CACHRx IN THE VECTOR 
;* LOCATION. 


36 
;* COMMENTS: 

34 

;* SUBORDINATE ROUTINES CALLED: NONE 


5 -- SERERERAEEERESEAEEEEREEEREEEEHEREAEEERHAEDEEREREEEEREREDEEREEEREDE EE EEEEEEE 
CACHRX: : SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS ,PREGOS ;CALL REGISTER SAVE SuUBRT. 
MOV RXINTC,R1 ;GET THE RECEIVER INTERRUPT COUNT 
INC R1 s INCREMENT THE COUNT 
BVC es ;BRANCH IF NO OVERFLOW OCCURRED 


DEC R1 sRESET THE COUNT TO 177777 
2s: MOV R1,RXINTC ;SAVE NEW COUNT VALUE 
60$: PASS sRESTORE GPRS. 
JSR PC,acSP)-> sRETURN TO PREGOS SUSRT. 
RTI 


SEQ lie 


JI 
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INTERRLPT SERVICE ROUTINE - CACHIX - 
43537 -SBTTL INTERRUPT SERVICE ROUTINE - CACHTX - 
4338 EHH SESSEAESESESEEEEEEEEEAALESEAEESEAEEEDOAEAEEAEADEAEEEEEEEES EEEEEERDAOREEEBESE 
4339 @ - CATCH TRANSMITER INTERRUPT. 
4340 34 THIS ROUTINE IS USED IN SEVERAL TESTS,TO LOG A COUNT OF THE 
rr 3¢ NUMBER OF TRANSMISSION INTERRUPTS THAT OCCUR. 
3*¢ 
4343 ;* INPUTS: CSRA - CONTAINS THE ADDRESS OF THE CSR. 
4344 34 TXINTC - HOLDS THE COUNT OF THE NUMBER OF Tx INTERRUPTS 
shes 34 THAT OCCURRED. 
4346 ;* 
ps ol ;# OUTPUTS: TXINTC - CONTAINS THE UPDATED INTERRUPT COUNT. 
434 ;* 
4349 3% 
4350 ;# CALLING SEQUENCE: PUT THE ADDRESS OF THE LABEL CACHTX IN THE VECTOR 
4351 ;* LOCATION. 
4352 34 
4353 ;* COMMENTS: 
4354 34 
4355 ;* SUBORDINATE ROUTINES CALLED: NONE 
4356 5 - MHORSSARREESEEEEAAEEEEEEEEEAEEREEAERERERAOAAAREAEAEEEEEAEEREREDEEEEEEEEEDEA 
4357 
4358 023660 CACHTX: : SAVE ;SAVE CONTENTS OF GPRS RO THRU RS. 
23660 004567 160112 JSR RS ,.PREGOS ;CALL REGISTER SAVE SUBRT. 
4359 023664 016701 156436 MOV TXINTC,R1 ;GET THE TRANSMISSION INTERRUPT COUNT 
4360 023670 005201 INC Ri ; INCREMENT THE COUNT 
4361 023672 102001 BvC 2s ;BRANCH IF NO OVERFLOW OCCURRED 
4362 023674 005301 DEC Ri sRESET THE COUNT TO 177777 
4363 023676 010167 156424 2s: MOV R1,TXINTC ;SAVE NEW COUNT VALUE 
4364 023702 60$: PASS sRESTORE GPRS. 
023702 004736 JSR PC aC SP )-+ sRETURN TO PREGOS SUBRT. 
4365 023704 000002 RTI 


TATERRUPT SERVICE ROUTINE 


0 
023752 
023754 


156432 


156424 
156422 


156414 
156412 


156406 


KI 
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. KINT - 


-SBTTL INTERRUPT SERVICE ROUTINE - CLKINT - 
FOF SEBSEEEEESSEEREREASEAESESESEEASEAEARARDADEEREAAADADEEEEREREDEREDAEAREAEDAE AEDS 


34 THIS ROUTINE IS EXECUTED CLKHRZ TIMES PER SECOND. IT DECREMENTS THE 
34 TWO TIMER COUNTERS DOWN TO ZERO. 

if 

;* INPUTS: TIMER1 - TIMER COUNTER 41. 

34 TIMERS - TIMER COUNTER ¢2. 

34 TIMERS - TIMER COUNTER FOR CALL OF BREAK MACRO. 


THE 2 TIMER COUNTERS ARE DECREMENTED IF THEY ARE NOT ZERO. 
PUT @CLKINT IN THE CLOCK INTERRUPT VECTOR SLOT. 


;* 

;* OUTPUTS: 
;* 

;# CALLING SEQUENCE: 


34 PUT THE DESIRED TIME PERIOD (SECONDS TIMES CLKHRZ) IN 
;4 EITHER TIMER1 OR TIMER2 AND POLL THE RESPECTIVE TIMER 
3% COUNTER TO DETECT ITS GOING TO O ON TIME-OUT. 
3% 
;* COMMENTS: THE 2 COUNTERS WILL NOT WRAPAROUND BUT WILL STOP AT oO. THIS 
34 ALLOWS THE DETECTION OF A TIME-OUT ANY TIME AFTER THE TIME-OUT 
34 HAS OCCURRED UNTIL THE TIMER COUNTER IS SET TO ANOTHER VALUE. 
34 
;# SUBORDINATE ROUTINES CALLED: NONE. 
s-- SREESEAEOEESAEEAREESARESASAEASEAREEAERESEEEACEEAEEEEEESEEEEEEAEEREREEEDDEDE 
CLKINT:: TST TIMER1 ;sCHECK FOR TIMER1 AT ZERO. 
BEQ 2$ sBRANCH TO LEAVE IT AT ZERO IF IT IS ZERO. 
DEC TIMER1 ;sDECREMENT TIME COUNT. 
2s: TST TIMER?) ;sCHECK FOR TIMER2 AT ZERO. 
BEQ 4$ ;BRANCH TO LEAVE IT ALONE IF IT’S ALREADY ZERO. 
DEC TIMERS ;DECREMENT TIME COUNT. 
4$: DEC TIMERS sDECREMENT THE BREAK COUNT. 
BNE 60$ sEXIT IF NOT TIME TO CALL BREAK. 
156402 MOV BCOUNT , TIMERS ;SET UP TIME TILL NEXT BREAK. 
MOV RO, -(SP) ;SAVE CONTENTS OF RO FROM BREAK MACRO. 
BRE ;CHECK FOR OPERATOR CONTROL/C. 
TRAP CSsBRK 
MOV (SP)+,RO sRESTORE CONTENTS OF RO. 
60$: RTI 


SEQ 114 


GRPERER Seabee MGT ne AR 


023756 
0 


0 
024034 


010167 


004736 
000002 
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156310 


Lo 


SEQ 115 


-SBTTL INTERUPT SERVICE ROUTINE - RXBRRT - 


3+ SERSRESEAESESESASAEEEDEBEEEEESEAERAAEESEAEREAAEAEAAEREDEEREEAEAEEAREEERDES * 


3* - BR LEVEL TEST RECEIVE INTERRUPT SERVICE ROUTINE - 

34 THIS SERVICE ROUTINE HANDLES RECEIVE INTERRUPTS DURING THE INTERRUPT 
;* BR LEVEL TEST. THIS ROUTINE COUNTS THE INTERRUPT AND SETS A FLAG 
34 TO INDICATE THAT THE INTERRUPT HAS OCCURRED. IT ALSO CHECKS THE 
;* FLAG WHICH INDICATES THAT A TX INTERRUPT HAS OCCURRED. IF THE Tx 
34 INTERRUPT FLAG IS SET, THIS ROUTINE SETS AN INTERRUPT ORDER ERROR 
3% FLAG INDICATING THAT A TRANSMIT INTERRUPT WAS SERVICED BEFORE A 
3;* SIMULTANEOUS RECEIVE INTERRUPT. 

;* 

;* INPUTS: RXINTC - HOLDS THE COUNT OF THE NUMBER OF RX INTERUPTS. 
Pt RXINTF - RX INTERRUPT FLAGS. 

;* 

;# OUTPUTS: RXINTC - CONTAINS THE UPDATED INTERUPT COUNT. 

;* RXINTF - RX INT FLAGS: 

34 (BIT O SET, BIT 14 SET IF TXINTF BIT O IS SET.) 


+ 
;* CALLING SEQUENCE: PUT THE ADDRESS OF THE LABEL RXBRRT IN THE VECTOR 
& LOCATION. 


te 

;* COMMENTS: NOTE: THE FIFO IS NOT PURGED BY THIS ROUTINE. 
3% 

;* SUBORDINATE ROUTINES CALLED: NONE. 


-- SESEBEEEESEEEEEEAAEEAEEAAAEAEEEAEEEEEEREEEERASEEASEASALEEARASESARAAELEEEEESLS 


RXBRRT:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
RS .PREGOS ;CALL REGISTER SAVE SUBRT. 
MOV QRBUF A ,RO sREAD THE CHAR OUT OF FO. 
MOV RXINTC,R1 sGET THE INTERUPT COUNT 
INC R1 s INCREMENT THE COUNT. 
BEQ es sBYPASS UPDATING COUNT IF OVERFLOW OCCURRED. 
MOV R1,RXINTC sSAVE NEW COUNT VALUE. 
2s: MOV RXINTF RL sGET THE RX INTERRUPT FLAGS. 
81s @BITO,R1 sSET THE RX INTERRUPT HAS OCCURRED FLAG. 
BIT @B ITO, TXINTF sTEST THE “TX INT HAS OCCURRED” FLAG. 
BEQ 4% 3SKIP SETTING ERROR FLAG IF NO TX INT. 
BIS #BIT14,R1 3SET THE INTERRUPT ORDER ERROR FLAG. 
4$: MOV R1,RXINTF ;UPDATE THE RX INTERRUPT FLAGS. ) 
60$: PASS sRESTORE GPRS. 
. JSR PC ,aCSP)> sRETURN TO PREGOS SUBRT. 
RTI 


O DHU-11 FUNC TST PART1 


CZ0HUB 
INTERUPT SERVICE ROUTINE 


024036 
0 


024122 


1561 
157614 


156162 
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- RXINPT - 


156234 


-SBTTL INTERUPT SERVICE ROUTINE 


- RXINPT - 


3+ PEBERERERESEESESEREEEREREREEERSEEEAEEAEEAEEREERERERAEREAREDADR RADAR READREDE EDS 


- RECEIVE CHARACTER INPUT INTERRUPT SERVICE ROUTINE - 


;* 


THIS SERVICE ROUTINE INPUTS A CHARACTER FROM THE DUT 
CHAR (COMPLETE WITH STATUS FLAGS) INTO A RECEIVE CHAR 
MORY. THE INTERRUPT IS ALSO COUNTED. 


AND LOADS THE 
BUFFER IN 
THE RECEIVE CHAR BUFFER IS 


ME 
MONITORED TO ENSURE THAT IT DOES NOT OVERFLOW. 


INPUTS: 


OUTPUTS: 


CALLING SEQUENCE: 


COMMENTS: 


BUFEND - LABELS THE END OF THE HOST MEMORY BUFFER. 
BUFPTR - CONTAINS ADDRESS OF NEXT FREE BUFFER LOCATION. 
CSRA - CONTAINS THE ADDRESS OF THE DUT CSR. 

RBUFA - CONTAINS THE ADDRESS OF THE RBUF DUT REGISTER. 


RXINTC - HOLDS THE COUNT OF THE NUMBER OF RX INTERUPTS. 

RXINTF - RX INTERRUPT FLAGS. 

BUFPTR - CONTAINS UPDATED ADDRESS OF NEXT FREE BUFFER LOCATION. 
RXINTC - CONTAINS THE UPDATED INTERUPT COUNT. 

RXINTF - RX INT FLAGS (BIT 15 SET IF RX.DATA.AVAIL IS CLEAR). 


PUT THE ADDRESS OF THE LABEL RXINPT IN THE VECTOR 
LOCATION. 


IN CASE OF OVERFLOW OF THE MEMORY BUFFER, BUFPTR WILL BE 
MAINTAINED EQUAL TO BUFEND AND THE WORD AT BURFPTR WILL BE 
THE LAST WORD READ FROM THE DUT FIFO. 

NOTE: THIS ROUTINE CAN DESTROY TX.ACTIONS BY READING THE CSR. 


3;# SUBORDINATE ROUTINES CALLED: NONE. 


t-- SEARASESEASESABESESAAASESESEASEASASASESAASASEAESEAAEEREREREERDEEEEEEEEREDDA 


RXINPT:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 
MOV @CSRA,R1 sREAD THE CONTENTS OF THE CSR. 
BIT @BIT7,R1 ;TEST RX.DATA.AVAIL BIT. 
2s sBRANCH AROUND SETTING FLAG IF BIT IS SET. 
BIS @BIT1S5,RXINTF sSET THE RX.DATA.AVAIL CLEAR FLAG. 
2s: MOV RXINTC,R1 sGET THE INTERUPT COUNT. 
INC R1 s INCREMENT THE COUNT. 
BEQ 43 sBYPASS UPDATING COUNT IF OVERFLOW OCCURRED. 
MOV R1,RXINTC sSAVE NEW COUNT VALUE. 
4$: MOV BUFPTR,Re s;GET THE POINTER TO NEXT FREE BUFFER WORD. 
MOV @RBUFA,CR2)+ sREAD A CHAR FROM THE FIFO INTO BUFFER. 
CMP R2,BUF END ;TEST FOR POINTER BEYOND END OF BUFFER. 
BHIS 60$ sSKIP THE PTR UPDATE IF PTR OUT OF SQUNCS. 
MO R2,BUFPTR sUPDATE THE BUFFER POINTER. 
60$: PASS sRESTORE GPRS. 
JSR PC, @(SP)-> sRETURN TO PREGOS SUBRT. 
RTI 


SEG 116 


GLOBAL TRAP SeAVICE Rou 


4516 024124 
4517 024130 
4518 024:32 
4519 024156 
4520 024144 


021627 
2 
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TINE - TP4RTN 


017764 


156164 
100000 156154 


-SBTTL GLOBAL TRAP SERVICE ROUTINE - TP4RTN - 

3 #eae SPPRAEEEEEEEEEEESELELABEAEAEEEEERERAEAEEEARAEEBEEREEREAAEADRAREDEEREAEEAEEES « 
;* BUS TIME-OUT TRAP (004 TRAP) SERVICE ROUTINE - 

34 THIS ROUTINE DETERMINES IF THE 9004 TRAP WAS CAUSED By 

34 AN “EXPECTED” ERROR OR NOT BY EXAMINING THE RETURN PC VALUE ON THE 

3% STACK. IF THE TRAP IS UNEXPECTED, THIS ROUTINE JUMPS TO THE NORMAL 

34 DIAGNOSTIC SUPERVISOR 004 TRAP HANDLING ROUTINE. 

;* 

;* 

;* INPUTS: SP - POINTS TO THE PC WHERE THE TRAP OCCURED. 

34 ADRPTR - LABEL AT THE ADDRESS WHERE “EXPECTED” TRAPS OCCUR. 

6 TP4FLG - 004 TRAP FLAGS. 

3% 

;# OUTPUTS: TP4FLG - BIT 15 IS SET IF “EXPECTED” TRAP OCCURED. 

34 

;# CALLING SEQUENCE: PUT ADDRESS POINTED TO BY TP4RTN IN 004 VECTOR. 

34 OCCURENCE OF 004 TRAP VECTORS TO THIS ROUTINE. 

;* 

;* COMMENTS: ANY 004 TRAP WHICH OCCURS AT AN ADDRESS OTHER THAN THAT LABELED 
34 ADRPTR WILL BE HANDLED BY THE NORMAL 004 TRAP SERVICE ROUTINE. 


3% 
3# SUBORDINATE ROUTINES CALLED: NONE. 


3 SHEREREAEEREESEAAAEASEAEERAREREEEAREAEAREREREREAREREREEEEERALERERARERERADEAES 


TP4RTN: : oo ao s;COMPARE EXPECTED ADR AGAINST TRAP RET PC. 


BEQ IF THEY MATCH, CONTINUE THIS ROUTINE. 

JMP @TP4vEC ;IF NOT,JUMP TO NORMAL 004 TRAP SERVICE RTN. 
2s: BIS #BIT15,TP4FLG ;SET THE 004 TRAP OCCURED FLAG. 

RTI sALL DONE, GO BACK TO THE TEST. 


SEQ 117 


ZOMUBO DHU-11 F 
NTERUPT SERVICE ROUTINE 

4522 
4525 
4524 
4525 
4526 
4527 
4528 
4529 
4530 
4531 
4532 
4555 
4534 
4535 
4556 
4537 
45368 
4539 
4540 
4541 
4542 
4545 
4544 
4545 
4546 024146 

024146 7 
4547 024152 016701 
4548 024156 005201 
4549 024160 102001 
4550 024162 005301 
4551 024164 010167 
4552 024170 016703 
4553 024174 017702 
4554 024200 100402 
4555 024202 052703 
4556 024206 052703 
4557 024212 010367 
4558 024216 

024216 004736 
4559 024220 000002 


UNC TST PARTI 


157624 
156150 
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- TXINTR - 


-SBTTL INTERUPT SERVICE ROUTINE - TXINTR - 


°° SSSSESEESESSOSESSESSESEESOEEESOSESEBESESLEEEEESEDEADREREAEEEEEEEEEEEEEDEEEDESS 


36 - TRANSMIT INTERRUPT SERVICE ROUTINE - 

s¢ THIS ROUTINE HANDLES A TRANSMIT INTERRUPT FROM THE DEVICE UNDER TEST 
3° (DUT) BY COUNTING THE INTERRUPT AND READING THE DUT CSR TO CLEAR THE 
3° INTERRUPT REQUEST. THIS ROUTINE ALSO SETS A FLAG TO INDICATE THAT 
3° A TX INTERRUPT HAS OCCURRED AND SETS A FLAG IF THE TX.ACTION BIT IS 
3¢ NOT SET IN THE READ CONTENTS OF THE DUT CSR. 

io 

3¢ INPUTS: CSRA - CONTAINS THE ADDRESS OF THE CSR. 

3° TXINTC - HOLDS THE COUNT OF THE NUMBER OF Tx INTERUPTS. 

3¢ TXINTF - TX INTERRUPT FLAGS. 

3° 

3¢ OUTPUTS: TXINTC - CONTAINS THE UPDATED Tx INTERUPT COUNT. 

36 TXINTF - TX INT FLAGS (BIT O SET, BIT 15 SET IF TX. ACTION CLR). 


3¢ 
3@ CALLING SEQUENCE: PUT THE ADDRESS OF THE LABEL TXINTR IN THE VECTOR 


3% 

3¢ COMMENTS: 

3° 

:@ SUBORDINATE ROUTINES CALLED: NONE 


g-- SESOOGOSEEOSESSSESEEEASEESESAAEOEEEEEOREEEEEEEEEEEEEEREEEDEEEEEOEEEESEOESEES 


TXINTR:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
JSR S.PREGOS sCALL REGISTER SAVE SUBRT. 
MOV TXINTC,R1 sGET THE TX INTERUPT COUNT. 
Ri s INCREMENT THE COUNT. 
BvC es sBRANCH IF NO OVERFLOW OCCURRED. 
DEC R1 sRESET THE COUNT TO 177777. 
2s: MOV R1, TXINTC sSAVE NEW COUNT VALUE. 
MOV TXINTF ,R3 sGET THE TX INTERRUPT FLAGS. 
MOV @CSRA ,R2 sREAD THE CSR. 
Ss sSKIP SETTING OF FLAG IF TX.ACTION IS SET. 


BIS ©BIT1iS,R3 sSET THE TX.ACTION CLEAR FLAG. 
4$: BIS @BITO,R3 sSET THE TX INT HAS OCCURRED "LAG. 
MOV RS, TXINTF sUPDATE THE TX INTERRUPT FLAGS. 
60$: PASS sRESTORE GPRS. 


JSR PC .a( SP). 


sRETURN TG PREGOS SUBRT. 


SEQ 118 
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4508 
4569 
4a59 .SBTTL REPORT CODING SECTION 
4572 see 
4573 s THE REPORT CODING SECTION CONTAINS THE 
tars ; “PRINTS” CALLS THAT GENERATE STATISTICAL REPORTS. 
eg 

4576 
4577 024222 BGNRPT 

024222 LSRPT:: 
4578 
4579 024222 EXIT RPT 

024222 000167 . WORD J$ IMP 

024224 000000 -WORD L10017-2-. 
4580 
4581 .EVEN 
“582 
4583 024226 ENDRP 1 

024226 L10017: 

TRAP CsRpr 


024226 104425 


D1O 


BRAYEO PHY rad, FUNC TST PARTL MACRO M1200 15-MAR-84 09:15 PAGE 94 SEO 120 
4 P 
4e58 SBTTL PROTECTION TABLE 
4 
389s — 
4596 ; THIS TABLE IS USED BY THE RUNTIME SERVICES 
4597 ; TO PROTECT THE LOAD MEDIA. 
4598 Fe 
4599 
4600 024230 BGNPROT 
024230 LS$PROT:: 
4601 


sOFFSET INTO P-TABLE FOR CSR ADDRESS 
sOFFSET INTO P-TABLE FOR MASSBUS ADDRESS 
sOFFSET INTO P-TABLE FOR DRIVE NUMBER 


4602 024230 177777 
4693 024232 177777 
4604 024234 177777 


4605 
4606 024236 ENDPROT 
4607 


‘ ‘ ' 
wo 


E10 
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PROTECTION TABLE 
4629 
4630 
pres -SBTTL INITIALIZE SECTION 
6 gee 
4633 § PESSSESESEASSESEDESSEEESESEBESEAEESEAESEEEEEEOEEAEEREAAAEEEDEREDAEEDREDESEEEEAD ESS 
4634 34 THIS SECTION CONTAINS THE CODE WHICH IS PERFORMED AT THE BEGINNING OF 
4635 34 EACH PASS OR AFTER A CONTINUE COMMAND. 
pe 34 THIS CODE PERFORMS THE FOLLOWING ACTIONS: 
7 3* 
4638 3% MOVES THE R caeaetniet HELD IN THE HARDWARE P-TABLE INTO THE GLOBAL 
4659 34 DATA AREA 
4640 3* 
4641 § SPSSESESESEASESEEESEEHEESESEEAEEESESEEDEDAEEALERESEEREAAEEEEEOAEDEDEEDEDREEAREDS 
4642 g-- 
4643 024236 BGNINIT 
024236 LSINIT:: 
4644 ;SEE IF PROGRAM JUST STARTED, BR IF YES 
4645 024236 READEF 9#EF .START 
024236 012700 000040 MOV SEF .START,RO 
024242 104447 TRAP CSREFG 
4646 024244 BCOMPLE TE NEWSTA 
024244 103416 BCS NEWSTA 
4647 ;SEE IF PROGRAM JUST 1 Ha BR IF YES 
4648 024246 READEF 9#€F .RESTART 
024246 012700 000037 MOV @EF .RESTART.RO 
024252 104447 TRAP CSREFG 
4649 024254 BCOMPLETE NEWRES 
024254 103556 BCS NEWRES 
4650 ;SEE IF THIS IS A NEW PASS, BR IF YES 
4651 024256 READEF 6EF .NEW 
024256 012700 000035 MOV SEF .NEW,RO 
24262 104447 TRAP CSREFG 
4652 024264 BCOMPLETE NEWPAS 
24264 103555 BCS NEWPAS 
4653 ;SEE IF PROGRAM WAS JUST CONTINUED 
4654 024266 READEF 4#€F .CONTINUE 
024266 012700 000036 MOV @EF . CONT [NUE ,RO 
024272 104447 TRAP CSREFG 
4655 024274 BNCOMPLE TE GE TPRM 
024274 103161 BCC GE TPRM 
4656 024276 000167 000540 JMP ENDIT 
4657 024302 NEWSTA: 
4658 024302 BRESET sRESET THE BUS TO PREVENT et INTERRUPTS. 
eane 024302 104433 TRAP CSRESET 
3° 
saat ; SET UP FOR LINE TIME CLOCK INTERRUPTS. 
§ = 
4662 024304 CLOCK 1L,RI ;GET THE CLOCK PARAMETERS. 
024304 012700 000114 Vv #’°L,RO 
024310 104462 TRAP CSCiCK 
3 010001 MOV RO,RL 
4663 024314 012167 156014 MOV CR1)+,CLKCSR sSTORE CLOCK CSR ADDRESS. 
4664 <h 012167 156012 MOV CR1)+, CLKBRL sSTORE CLOCK BUS REQ INT LEVEL. 
4665 024324 012167 156010 MOV CR1)+ ,CLKVEC sSTORE CLOCK INTERRUPT VECTOR. 
4666 024330 0612167 156 MOV CR1)+ CLKHRZ sSTORE CLOCK FREQUENCY. 
4667 024334 026727 156002 000062 CMP CLKHRZ, #50 ;TEST FOR SOHZ LINE FREQUENC). 
4668 024342 001004 BNE 2s ;sBRANCH IF CLOCK IS NOT SOHZ. 
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024426 


024430 
024436 


024444 


024510 


024514 


012767 
000403 
012767 
012746 


016767 
012767 


012767 
005067 


000024 
000021 
000300 
023706 
155742 
000003 
000010 
155726 
155730 
000240 


153550 
024124 


173012 


173166 
155532 


000001 
155504 
000006 
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156002 


155772 2$: 
4$: 


155664 
153340 


155654 


153304 


155600 
153254 


153212 
155560 


i 

s ENABLE THE LINE TIME CLOCK (LTC) CHECKING TO MAKE SURE THAT THE CSR 
; IS ACCESSABLE. 

FIRST SET UP TO CATCH ANY 004 TRAPS WHICH OCCUR: 


sSAVE THE EXISTING 004 TRAP VECTOR. 
sSET 004 TRAP VECTOR TO OUR SERVICE RTN ADR. 


CAL IBRATE THE 


68: 


MOV 
BR 


MOV 
SETVEC 


MOV 
MOV 


ENABLE LTC 


JSR 


920. ,MSTICK 
as 


017. ,MSTICK 


s INDICATE 20MS PER CLOCK TICK. 
sINDICATE 17 MS PER CLOCK TICK. 


SE@ 122 


CLKVEC, OCLKINT , @PRIO6 sINITIALIZE CLOCK INTERRUPT VECTOR. 
MOV oPRIO6, -( SP 
MOV @CLKINT, -(SP) 
MOV CLKVEC, -(SP) 
MOV o3,-C 
TRAP CS$SVEC 
ADD #10,SP 
CLKHRZ,RO sINITIALIZE THE BREAK COUNT 
RO ; TO CAUSE A BREAK 
RO,BCOUNT ; EVERY 2 SECONDS 
oPRIOS sALLOW CLOCK INTERRUPTS DISABLE OTHERS. 
MOV OPRIOS ,RO 
TRAP C$SPRI 


4, TP4vEC 
@TP4RTN,4 


CHECKING FOR 004 TRAP IN CASE CSR IS NOT THERE. 


TP4FLG sCLEAR THE 004 TRAP FLAG. 
@BIT6,WORD1 ;SET UP TO SET BIT6 OF THE LTC CSR. 

1, sSET UP WORD1 AS THE CKTRAP MOVE SOURCE. 
CLKCSR,R1 s;SET UP LTC CSR AS ao FOR CKTRAP MOVE. 
PC .CKTRAP sMOVE ANDO CHECK FOR TRAP. 

TP4VEC ,4 sRESTORE THE NORMAL 004 TRAP VECTOR. 

:IF NO TRAP, LTC IS THERE SO CONTINUE. 
CLKHRZ sCLEAR LTC FREQUENCY WORD TO INDICATE NO LTC. 
8$ sBYPASS THE FOLLOWING CALIBRATION PROCEDURES. 


DELAY ROUTINE MILLI-SECOND DELAY COUNT VALUE. 
PC .CALMSL 


; " CHECK FOR MEMMORY MANAGEMENT as sa ON THIS MACHINE. 
; IF MEM MGT IS PRESENT, DISABLE I 


10$: 


MOV 
MOV 


4, TP4VEC sSAVE THE EXISTING 004 TRAP VECTOR. 

@TP4RIN,4 sSET 004 TRAP VECTOR TO OUR SERVICE RTN ADR. 
TP4FLG sCLEAR THE 004 TRAP FLAG. 

WORD1 sPREPARE TO CLEAR THE MEM MGT SRO REGISTER. 
@WwORD1 .RO sSELECT CLEARED WORD AS CKTRAP RTN SOURCE. 
MMSRO.R1 sSELECT MEM MGT SRO REGISTER AS DESTINATION. 
MMPRES s INDICATE NO MEM MGT PRESENT IN CASE IT ISN’T 
MMENAB s INDICATE MEM MGT IS NOT ENABLED 

PC .CKTRAP ;CLEAR THE MEM MCT SRO REG AND CHECK FOR TRAP. 
TP4VEC ,4 sRESTORE THE NORMAL 004 TRAP VECTOR. 

10% sSKIP INDICATING MEM MGT go a EY TSH. 
@1,MMPRES sINDICATE THAT MEM MGT IS PRESENT 

PASCNT sCLR COUNTER USED IN REPORTING ROM VERSION 2. 
NEWPAS 3SKIP AROUND THE BUS RESET, IT’S BEEN DONE. 
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INITIALI7E SECTION 
4718 
4719 024612 NEWRES: BRESET sRESET THE BUS TO PREVENT ILLEGAL INTERRUPTS. 
024612 104433 TRAP CSRESET 
4720 024614 005067 155472 CLR PASCNT sCLR COUNTER USED IN REPORTING ROM VERSION 6. 
4721 024620 NEWPAS: 
oak 024620 012767 177777 155410 MOV @-1,UNITN sRESET LOGICAL DEVICE TO -i 
4724 ; ” INCREMENT THE PASS COUNTER, CORRECT FOR ANY  imonia 
re ; THIS COUNTER IS USED IN THE ROM VERSION TEST 
6 A 
4727 024626 005267 155460 INC PASCNT ; INCREMENT THE PASS COUNTER 
4728 024632 001002 BNE GE TPRM ;BRANCH IF WE HAVE NOT YET? “ OVERFLOWED. 
orks 024634 005367 155452 DEC PASCNT ;SET PASS COUNT TO 177777 OCTAL. 
4731 ; GET THE HARDWARE PARAMETERS FOR THIS UNIT. 
4732 024640 GETPRM: 
4733 024640 005267 155372 INC UNITN s INCREMENT LOGICAL DEVICE NUMBER 
4734 024644 026767 155366 155140 CMP UNITN,LSUNIT SSEE IF MAXIMUM UNIT NO. EXCEEDED 
ptt 024652 002362 BGE NEWPAS ;BR IF YES 
4737 024654 GPHARD UNITN,R1 ;GET P-TABLE POINTER INTO Ri 
024654 016700 155356 MOV UNITN,RO 
024660 104442 TRAP C $GPHRD 
024662 010001 MOV RO,R1 
4738 024664 BCOMPLE TE 30$ ;BR IF DEVICE AVAILABLE 
024664 103401 BCS 30$ 
ache 024666 764 BR GE TPRM sSKIP THIS DEVICE 
4741 
4742 3; #200446¢0408 HARDWARE PARAMETER MOVING CODE seeeseceneceseces 
4743 024670 012167 155346 30$: MOV CR1)+,CSRA sSTORE DHU-11 CSR ADDRESS IN DEV.REG.ADDRESS TABLE 
4744 024674 012102 MOV CR1)+,R2 ;GET THE RX INTERRUPT VECTOR ADDRESS. 
4745S 024676 010267 155330 MOV R2,RXVECA s;STORE RX INT VECTOR ADDRESS. 
4746 024702 062702 000004 ADD 04 .R sCALCULATE TX INTERRUPT VECTOR ADDRESS. 
4747 024706 010267 155322 MOV R2, TXVECA STORE TX INT VECTOR ADDRESS 
4748 024712 012167 155312 MOV (R1)+,ACTLNS ;STORE DHU-11 ACTIVE LINE ari 
pine 024716 111167 155316 MOVB CR1), BRLEVL sSTORE OHU-11 INTERUPT BUS REQUEST LEVEL 
3 > 
4751 3 CALCULTATE DEVICE REGISTER ee PUT THEM IN THE 
ppt : DEVICE REGISTER ADDRESS TABLE 
ig 
4754 024722 016701 155314 MOV CSRA,R1 ;COPY CSR ADDRESS 
4755 024726 005201 INC Ri ; INCREMENT CSR ADDRESS 
4756 024730 00 INC R1 ; COPY BY e2. 
4757 024732 012703 000007 MOV @7,R3 sSET UP REGISTER COUNT 
4758 024736 012702 002244 MOV ORBUF ARO SGET LOCATION WHERE RBUF ADDRESS GOES IN TABLE 
4759 024742 010122 12$: MOV are (R2)+ sSTORE REGISTER ADDRESS IN TABLE 
4760 024744 5201 INC R1 ; INCREMENT REGISTER ADDRESS 
4761 024746 005201 INC R1 ; BY 2,FOR THE NEXT DEVICE REGISTER. 
4762 024750 005303 DEC R3 ; DECREMENT REGISTER COUNT 
pin 024752 001373 BNE i2$ ;LOOP IF NOT DONE 
4765 3° 
ane ; INITIALISE THE BMP CODE QUEUE. 
Hy - 
4768 024754 012700 002526 MOV OBMPCOQB ,RO ;GET THE START ADDRESS OF THE QUEUE. 
4769 024760 012701 002726 MOV @BMPCQE ,R1i ;GET THE END ADDRESS OF THE QUEUE. 


PARTY RC DEY Sear TENS TS! 


4770 
4771 
4772 


024774 


024776 


103775 


032767 
001416 
026727 
003412 


016 746 
012746 


PARTI 


155534 


000020 
155000 


155214 
005433 
000002 


000006 


155240 


000340 
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MOV RO,BMPCQP 
14%: CLR CRO)+ 
CMP RO,R1 
BLO i4$ 


155220 
000001 


> 


; REPORT THE UNIT NUMBER IF THE SOFTWARE P-TABLE QUESTION WAS 
AND THE MAXIMUM UNIT NUMBER IS GREATER THAN 1. 


BIT oBIT4,OPTION 
BEQ 16$ 

CMP LSUNIT, #1 
BLE 16$ 


PRINTF &MFUNIT,UNITN 


sSET THE POINTER TO THE START OF THE QUEUE. 
sCLEAR OUT THE CONTENTS OF THE QUEUE. 
sCHECK IF END OF QUEUE 4AS BEEN REACHED. 
sLOOP IF NOT ALL DONE. 


ANSWERED ‘ES, 


sCHECK IF THE QUESTION WAS ANSWERED YES. 

;SKIP REPORTING UNIT NUMBER IF IT IS DISABLED. 
;CHECK MAXIMUM NUMBER OF UNITS SELECTED. 

;D0 NOT REPORT UNIT NUMBER IF MAX NUMBER < 1. 
sREPORT UNIT NUMBER. 


EQ 124 


MOV UNITN, -C SP) 
MOV OMF UNIT, -( SP) 
MOV 92, -CSP) 
MOV SP ,RO 
TRAP CSPNT 
ADD 96,SP 
16%: 
ENDIT: CLR CTRLCF ;CLR THE CTRL-C TEST ABORT FLAG. 
3; * 
; SET THE PROCESSOR PRIORITY TO DISABLE ALL INTERRUPTS. 
;” 
SETPRI *#PRIO7 :;SET PROCESSOR PRIORITY TO 7. 
MOV oPRIO7,RO 
TRAP CSSPRI 
ENDINIT 
L10021: 
TRAP CSINIT 
TNUM == 0 sINITIALTZE THE ASSEMBLER TEST NUMBER VARIABLE. 


ILO 


). f TST PARTI MACRO M1200 15-MAR 84 09:15 PAGE 96 e. oe, 
PARTY Re 1 seb THN co 1 

4801 
4802 
4803 .SBTTL AUTODROP SECTION 
4804 
4805 
4806 g¢6 
480” ; THIS CODE iS EXECUTED IMMEDIATELY AFTER THE INITIALIZE CODE IF 
4808 ; THE “ADR” FLAG WAS SET. THE UNIT(S) UNDER TEST ARE CHECKED TO 
4809 ; SEE IF THEY WILL RESPOND. THOSE THAT DON'T ARE IMMEDIATELY 
48i0 ; DROPPED FROM TESTING. 
4811 s-- 
48i2 
4813 025056 BGNAUTO 

025056 L$AUTO:; 
4814 
3821 
4822 025056 ENDAUTO 

L10022: 


025056 
025056 104461 TRAP CSALTO 


CZDHUBO DHU } 
AUTODROP SEC 


025074 
025074 
025074 


1 FUNC TST PAR"I 
ION 


005767 155222 
001401 


104433 


104432 
000002 


104412 


MACRO M1200 


.SBTTL CLEANUP CODING SECTION 


15-MAR-84 09:15 PAGE 97 


THE CLEANUP CODING SECTION CONTAINS THE CODING THAT IS PERFORMED 
; AFTER THE HARDWARE TESTS HAVE BEEN PERFORMED. 


2s: 


BGNCLN 


TST 
BEQ 
BRESET 


EXIT 


.EVEN 
ENDCLN 


CTRLCF 
2s 


CLN 


LS$CLEAN:: 


;DID WE GET HERE By CTRL-C FROM TEST? 

;CTRL-C FROM TEST? NO, SKIP BUS RESET. 

;YES, CLR ANY DMAS OR OUTSTANDING INTERRUPTS. 
TRAP CSRESET 


TRAP CSEXxIT 


-WORD 110023-. 


L10023: 
TRAP CSCLEAN 


SEG 126 


Z -11 FUNC_TST PARTI 
ECRANUP COobiAG SeC Tron 
4879 
4880 
4881 
4882 
4883 
4884 
4885 
4886 
4887 
4888 025076 
025076 
4897 025076 
025076 010046 
025100 012746 025122 
025104 012746 000002 
25110 O1 
025112 104417 
025114 062706 000006 
4898 025120 000427 
4899 
4900 025122 045 101 
25125 125 116 
025130 124 045 
025133 066 045 
025136 040 104 
025141 117 120 
025144 105 104 
025147 106 122 
025152 115 040 
025155 125 122 
025160 110 105 
025163 0460; 124 
025166 125 124 
025171 116 107 
CeSlia 045 116 
45u1 
4902 025200 
4903 025200 
025200 000167 
025202 000000 
4904 
4905 
4906 
4907 025204 
025204 
025204 104453 


K10 
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-SBTTL OROP UNIT SECTION 


s+¢ 


; THE DROP-UNIT SECTION CONTAINS THE CODING THAT CAUSES A DEVICE 
; TO NO LONGER BE TESTED. 


DROP : 


’ $D 
L$DU:: 
PRINIF @DROP.RO ;REPORT UNIT THAT HAS BEEN DROPPED. 
MOV 
HOV 
MOV 
MOV 
TRAP 
BR EDROP ;BRANCH AROUND THE MESSAGE. . 
.ASCIZ/SA UNITSD68A DROPPED FROM FURTHER TESTING. sN/ 
EVEN 
EXIT DU 
WORD 
"WORD 
ENDDU 
L10024: 
TRAP 


JS JMP 
L10024-2-. 


Csdvu 


SEQ 127 


CZOHUBO DHU-11 FUNC TST PART 


DROP UNIT SECTION 


025206 
025206 


025206 
025206 000167 
025210 000000 


025212 
025212 
025212 104452 


L1i0O 
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-SBTTL ADD UNIT SECTION 


;** 


; THE ADD-UNIT SECTION CONTAINS ANY CODE THE PROGRAMMER WISHES 


TO BE EXECUTED IN CONJUNCTION WITH THE ADDING OF A UNIT BACK 
TO THE TEST CYCLE. 


BGNAU 
L$AU:: 
‘ebEe: sidan 
INSERT ADD CODE HERE. THIS COD! WILL BE EXECUTED AFTER 
AN “ADD” COMMAND. THE PURPOSE OF THIS CODE IS TO DO ANY 
HOUSEKEEPING THAT MAY BE NECESSARY AFTER A UNIT HAS BEEN ADDED. 
THIS SECTION IS OPTIONAL, 
SESSA AS hs 
EXIT AU 
-WORD  JSJMP 
-WORD 1L10025-2-. 
EVEN 
ENDAU 


L10025: 
TRAP CSAU 


SEG 128 


025214 
025214 


025244 


025252 
025260 
025266 


025270 
025274 


012767 


016767 
012767 
005005 


016701 


015510 


152526 
024124 


172446 


100001 
000017 


154714 
172420 


100002 


155102 
5056 


155042 
152516 


000146 


000110 


-SBTTL HARDWARE TEST 
see 


M10 
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- ADRA - 


§ FBSSEEEEESEEESESSEEESEEEAEEARAEEEEEREREEEEEAERAEARARAEEAAEAEARMAAADAAREAAEREEAERESE 


;* 


- REGISTER ADDRESS TEST - 


THIS TEST VERIFIES THAT THE DEVICE REGISTERS WILL RESPOND TO THE PROPER 
UNIBUS HANDSHAKING SIGNALS WHEN ACCESSED. IF THE DHU11 DOES NOT RESPOND 

TO THE ACCESS ATTEMPTS CIF THE OHU11 IS AT THE WRONG ADDRESS, FOR EXAMPLE ) 
THE 004 BUS TIME-OUT TRAP IS DETECTED BY THIS ROUTINE AND AN ERROR 

IS REPORTED. THIS TEST IS PERFORMED ON LINE O ONLY. 


§ FRSAREREEAREEEDEREREEEEEEREEAEEEREREREREEAEEAEEEREEEAAEAEREAEEARERAEEEAREERR EES 


BGNTST , 
ls; 
TNUM == TNUM «¢ 1 s INCREMENT THE ASSEMBLY TIME TEST COUNTER. 
MOV &TNUM, TSTNUM ;SET UP THE TEST NUMBER. C1 
MOV #-1,CTRLCF s; INDICATE THAT WE ARE IN A TEST. 
MOV #101. ,ERRNBR ;SET THE TEST ERROR NUMBER IN THE TABLE. 
MOV @EMO103,ERRMSG ;SET UP THE TEST FAILURE MESSAGE IN THE TABLE. 
MOV #ERO101,ERRBLK ;SET-UP THE ERROR ROUTINE IN THE ERROR TABLE. 


; SET UP TO CATCH ANY 004 TRAPS WHICH OCCUR: 


MOV 4, TP4vEC sSAVE THE EXISTING 004 TRAP VECTOR. 
MOV @TP4RIN,4 sSET 004 TRAP VECTOR TO OUR SERVICE RTN ADR. 
CLR RS ;CLEAR THE ERROR FLAGS. 


3 
; HERE BEGINS THE LOOP TO TEST THE REGISTERS FOR A LINE 


4$: 


10$: 


FIRST TEST THE CSR AND SET THE 


IND.ADR.REG (I.A.R) FIELD. 


MOV CSRA,RO sSET UP CSR AS THE CKTRAP MOVE SOURCE. 

MOV #52$,R1 sSET UP DESTINATION LOCATION FOR CKTRAP MOVE. 
JSR PC ,.CKTRAP sMOVE AND CHECK FOR TRAP. 
6CS $ ;IF NO TRAP, BYPASS ERROR. 

BIS #100001 ,R5 ;SET FATAL READ ERROR FLAGS. 

BIC #17,52$ sCLEAR THE I.A.R FIELD OF THE CSR DATA. 

MOV R1,RO0 sUSE OLD DESTINATION FOR SOURCE OF CKTRAP MOVE. 
MOV CSRA,R1 sSET UP CSR AS THE CKTRAP MOVE DESTINATION. 

JSR PC ,CKTRAP sMOVE AND CHECK FOR TRAP. 
BCS $ IF NO TRAP, BYPASS ERROR. 

BIS #100002 ,,R5 ;SET FATAL WRITE ERROR FLAGS. 

0$ sEXIT AND REPORT FATAL ERROR. 
NOW, WE TEST EACH REGISTER FOR THIS LINE. 

MOV #8. ,R2 sINIT REGISTER COUNTER TO 8. 

MOV CSRA,50$ sINITIALIZE THE REGISTER POINTER. 

MOV $,RO ;SET UP REGISTER AS THE SOURCE FOR CKTRAP MOVE. 
MOV $,R1 sSET UP LOCAL STORAGE AS THE DES FOR CKTRAP. 
JSR PC ,CKTRAP sPERFORM THE MOVE, CHECK FOR TRAP. 

BCS 10$ ;IF NO TRAP, BYPASS THE SETTING OF ERROR FLAGS. 
BIS #100001 ,R5 ;SET FATAL READ ERROR FLAGS. 

MOV 1,R0 sUSE OLD DEST AS SRC FOR CKTRAP MOVE. 

MOV 50$,R1 ;SET UP REGISTER AS THE DEST FOR CKTRAP MOVE. 


SEQ 129 


CZ0HUBO DHU-11 
HARDWARE TEST 


4999 025404 


025474 


016767 
005705 
100012 


N10 
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172342 


154664 


154564 
154626 


154612 


152344 


JSR PC ,CKTRAP sPERFORM THE MOVE, CHECK FOR TRAP. 
BCS 12$ ;IF NO TRAP, BYPASS THE SETTING OF ERROR FLAGS. 
BIS #100002,R5 ;SET FATAL WRITE ERROR FLAGS. 
12$: INC 50$ ; INCREMENT THE REGISTER 
INC 50$ ; POINTER BY 2. 
DEC Re sCOUNT THE REGISTER. 
BNE 8$ ;LOOP TO TEST THE NEXT REGISTER ADDRESS. 
3¢ 
; DONE CHECKING DEVICE REGISTER ADDRESSES. 
; REPORT ANY ERRORS AND EXIT. 
| ee 
40$: MOV TP4VEC ,4 sRESTORE THE NORMAL 004 TRAP VECTOR. 
TST RS ;CHECK THE ERROR FLAGS. 
BPL 60$ sEXIT ROUTINE IF NO ERRORS. 
3;* 
; REPORT “DEVICE REGISTER ACCESS TEST FAILED” 
ERROR 
TRAP CSERROR 
DODU UNITN sDROP THIS UNIT FROM FUTHER TESTING. 
MOV UNITN,RO 
TRAP C$DO00U 
CLR CTRLCF s INDICATE NO CTRL-C ABORT FROM TEST. 
DOCLN sABORT THIS SUB PASS. 
TRAP CS$DCLN 
BR 60$ : 
3 #*04404000006404% LOCAL STORAGE. £6646464646464644444446446400464664446646000040040604 
50$: ° 0 sSTORAGE FOR THE SOURCE OR DEST OF THE CKTRAP MOVE. 
52s: . WORD sSTORAGE FOR THE SOURCE OR DEST OF THE CKTRAP MOVE. 


0 
#8060460 066468046448% END £664646460464664606466464646000000644640404604640004604644606844400464 
enkter CTRLCF ; INDICATE THAT WE ARE NOT WITHIN A TEST. 


L10026: 
TRAP 


60$: 


CsETST 


SEG 130 


CZ0HUBO DHU-11 FUNC TST 
HARDWARE 


TEST 


000002 
012767 
012767 


012767 


012701 
012702 
005003 


010214 
004767 


012767 
012701 


PARTI 
- MRSTA 


000002 154620 
177777 154574 
000240 

156240 


005616 156236 
016042 156232 


011610 
000040 


154462 
172400 


174550 
011610 
172360 


011610 
172344 
011610 


000 764 


000311 156120 


005651 


Bil 
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-SBTTL HARDWARE TEST - MRSTA - 


~ a r ree seeee ease te esesenesncesesooessosoosnssoonsosessoosees 


3¢ - MASTER RESET WITH SELFTEST TEST - 
34 THIS TEST VERIFIES THAT THE MASTER RESET BIT WILL CLEAR AFTER A DEVICE 
3° RESET AND THE PERFORMANCE OF THE DUT ROM BASED SELF TEST. 
34 
g-- SSSSSOODESSOOSEEOEOESEDEDEEEEOEESEEEEESEEADEEEEESEEEREREEEEEEEEEEEDOEEEEEEES 
sT 
Te: 

TNUM == TNUM + 1 s INCREMENT THE 7 TIME TEST COUNTER, 

MOV ew TSTNUM sSET UP THE TEST NUMBER 

MOV 1,CTRUCF s INDICATE THAT WE epee. IN A TEST. 

SETPRI 105 sALLOW LTC INTERRUPTS 

— OPRIOS ,RO 
RAF CsSPRI 
MOV #1 ,ERRTYP sSET ERROR TYPE AS FATAL IN ERROR TABLE. 
MOV #EM0201,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 


MOV ERO201,ERRBLK ;SET ERROR ROUTINE ADDRESS IN ERROR TABLE. 
; WAIT UP TO 5S SECONDS FOR THE DUT MASTER RESET BIT TO CLEAR. 
3- 

MOV #5000. .R1 sTIME-OUT VALUE IS 5.0 SECONDS. 

MOV @BITOS ,R2 sWAITING FOR MASTER RESET BIT. 

CLR R3 sWAITING FOR BIT TO CLEAR. 

MOV CSRA,R4 sBIT IS IN THE DUT’S CSR. 

JSR PC .MSLGET sWAIT FOR DUT_CSR_MR BIT TO CLEAR. 

BcSs 23 sSKIP TO RESET DuT IF MR CLEAR. 


> 
s DUT MASTER RESET BIT DID NOT GO CLEAR. DEVICE MAY BE STUCK IN SOME 
s OOD STATE. TRY TO RESET DEVICE WITH A BUS RESET 

3 


BRESET sNO, TRY TO JOG DEVICE WITH BUS RESET. 
TRAP CSRESET 
JSR PC, SKPSTS sTRY TO SKIP THE SELFTEST. 
MOV 05000. ,R1 sTIME-OUT VALUE IS S.0 SECONDS. 
JSR PC .MSLGET sWAIT FOR DUT_CSR_MR BIT TO CLEAR 
BCC 4 sGO REPORT ERROR IF MR BIT DID NOT CLEAR. 
3° 
; SET THE MASTER RESET BIT AND VERIFY THAT IT CLEARS WITHIN THE PROPER TIME. 
+ i 
2s: MOV sTIME-OUT VALUE IS 5.0 SECONDS. 
MOV Re ,(R4) 3SET THE DUT MASTER RESET BIT. 
JSR PC ,MSLGET sWAIT FOR OUT_CSR_MR BIT TO CLEAR 
BCC 4% :GO REPORT ERROR IF MR BIT DID NOT CLEAR. 
MOV #5000. ,Re 
SUB R1i,R2 sCALCULATE @ OF MS FOR MR TO CLEAR. 
BEG a sGO REPORT ERROR IF MR CLEAR IMMEDIATELY. 
BLT 8$ GO REPORT ERROR IF MR CLEAR IN « 1/2 SECOND. 
BR 608 sEXIT THE TEST WITHOUT ERROR. 


3° 
; ERROR REPORTS: 


sREPORT MR BIT WOULD NOT CLEAR AFTER A DUT RESET 
4%: MOV #201. ,E sSET THE ERROR NUMBER IN ERROR TABLE. 
MOV 0£M0202 ,R1 sSELECT ERROR MESSAGE 
ERROR sREPORT ERROR. >>>>> ERROR @201 «acs 


vd 3 
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025724 


104401 


025654 104460 TRAP SERR 
eons 025656 000415 BR 60$ sEXIT THE TEST. . - 
5089 ee. MR BIT CLEAR IMMEDIATELY AFTER DUT RESET 
5090 025660 012767 000312 156102 63: #202. ,ERRNBR sSET THE ERROR NUMBER IN ERROR TABLE. 

5091 025666 012701 006024 “Oe 0EM0203, R1 sSELECT ERROR MESSA 
5092 925672 ERROR sREPORT ERROR. >>>>> ERROR 8202 ««<«<«< 

025672 104460 TRAP CSERROR 

Fa o4y 025674 000406 BR 60% sEXIT THE TEST. 

5095 sREPORT MR CLEAR WITHIN 1/2 SECOND OF DUT RESET. 

5096 025676 012767 000313 156064 83: MOV @203. NBR ;SET THE ERROR NUMBER IN ERROR TABLE. 

5097 025704 012701 006167 MOV 0EH0204, R1 3SELECT can MESSAGE 

5098 025710 ERROR sREPORT ERROR. >>>>> ea 0203 «ccc 

025719 104460 RAP CSERROR 

025712 SETPRI @PRIO7 ;DISABLE ALL INTERRUPTS. 

025712 912700 000340 MOV @PRIO7.RO 

025716 104441 TRAP CSSPRI 

025720 005067 154362 CLR CTRLCF sINDICATE THAT WE COMPLETED THE TEST. 

025724 ENDTST 

025724 L10027: 


TRAP CSETST 


aael 
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HARDWARE TEST - MRSSTA 
5104 .SBTTL HARDWARE TEST - MRSSTA - 
5105 s** SESSSEEEESEASEESESESSESSESESEAEEEESEEEEESEALEDEDEDEEERODEEEDERAEDROEEERESEEEDSS 
5106 3:8 - MASTER RESET WITH SKIP SELFTEST TEST - 
5107 34 THIS TEST VERIFIES THAT THE MASTER RESET BIT WILL CLEAR AFTER A DEVICE 
3108 36 RESET AND THE SKIPPING OF THE DUT ROM BASED SELFTEST. 
1 we 
5110 a SPSSORESESESESESEEESEESESESEEEASOEEESEEEEAEEEEEEDEEREDEAEREEEEEREEEDEEEEREEEES 
Sii1 025726 BGNTST 
025726 T3:; 
5112 000003 TNUM == TNUM « 1 s INCREMENT THE ASSEMBLY TIME TEST COUNTER. 
5113 025726 012767 000003 154370 MOV @TNUM, TSTNUM ;SET UP THE TEST NUMBER. 
5114 025734 012767 177777 154344 MOV @-1,CTRLCF s INDICATE THAT WE ARE IN A TEST. 
5115 025742 SETPRI oPRIOS sALLOW LTC INTERRUPTS. 
025742 012700 000240 MOV &PRIOS,RO 
025746 104441 TRAP CS$SPRI 
5116 025750 012767 000001 156010 MOV @1,ERRTYP sSET ERROR TYPE AS FATAL IN ERROR TABLE. 
5117 025756 012767 006346 156006 MOV @EMO301,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 
zi18 025764 012767 016042 156002 MOV @ERO201,ERRBLK ;SET ERROR ROUTINE ADDRESS IN ERROR TABLE. 
3° 
3120 ; WAIT UP TO 5S SECONDS FOR THE DUT MASTER RESET BIT TO CLEAR. 
ie 
$122 025772 012701 011610 MOV #5000. .R1 sTIME-OUT VALUE IS 5.0 SECONDS. 
5123 025776 012702 000040 MOV @BITOS,Re sWAITING FOR MASTER RESET BIT. 
5124 026002 005003 CLR R3 sWAITING FOR BIT TO CLEAR. 
5125 026004 016704 154232 MOV CSRA,R4 :BIT IS IN THE DUT’S CSR. 
5126 026010 004767 172150 JSR PC .MSLGET sWAIT FOR DUT_CSR_MR BIT TO CLEAR. 
si27 026014 103410 BCS 2s sSKIP TO RESET OuT IF MR CLEAR. 
5 3* 
5129 ; DUT MASTER RESET BIT DID NOT GO CLEAR. DEVICE MAY BE STUCK IN SOME 
sta ; OOD STATE. TRY TO RESET DEVICE WITH A BUS RESET. 
$7 
5132 026016 BRESET sNO. TRY TO JOG DEVICE WITH BUS RESET. 
026016 104433 TRAP CSRESET 
5133 026020 004767 174320 JSR PC, SKPSTS ;TRY TO SKIP THE SELFTEST. 
5134 026024 012701 011610 MOV #5000. .R1 sTIME-OUT VALUE IS 5.0 SECONDS. 
5135 026030 004767 172130 JSR PC .MSLGET sWAIT FOR DUT_CSR_MR BIT TO CLEAR. 
Ht 026034 103024 Bcc 6% 3GO REPORT ERROR IF MR BIT DID NOT CLEAR. 
3 
5138 ; SET THE MASTER RESET BIT, TRY TO SKIP THE SELFTEST, AND VERIFY THAT THE 
sree ; MR BIT CLEARS WITHIN 1/5 SECOND. 
g- 
5141 026036 012701 000310 28: MOV 8200. .R1 3TIME-OUT VALUE IS 1/5 SECOND. 
5142 026042 010214 MOV R2,(R4) 3SET THE DUT MASTER RESET BIT. 
5143 026044 004767 174274 JSR PC. SKPSTS sTRY TO SKIP THE SELFTEST. 
5144 026050 004767 172110 JSR PC .MSLGET ;WAIT FOR DUT_CSR_MR BIT TO CLEAR. 
5145 026054 103007 BCC 4s :GO FIND OUT WHAT IS WRONG IF MR NOT CLEAR. 
5146 026056 012702 000310 MOV #200. ,R2 
5147 026062 160102 SUB R1,R2 sCALCULATE @ OF MS FOR MR TO CLEAR. 
5148 026064 020227 000012 CMP R2,010. 
5149 026070 002415 BLT 8$ :GO REPORT ERROR IF MR CLEAR IN < 10 MS. 
aeae 026072 000431 BR 60% sEXIT THE TEST WITHOUT ERROR. 
;* 
stae ; MR DID NOT CLEAR WITHIN 175 SECOND, SEE IF IT CLEARS WITHIN 5 SECONDS. 
Teg 
5154 026074 012701 011300 4$: MOV 04800. ,R1 ;TIME-OUT VALUE IS 5 SECONDS MINUS 1-5 SECOND. 
5155 026100 004767 172060 JSR PC,MSLGET sWAIT FOR DUT_CSR_MR BIT TO CLEAR. 


5156 026104 103416 BCS 10% 3GO REPORT ERROR IF MR CLEARED FINALLY. 


RAROWARE Test) TUNG TST 


012767 
012771 


104460 
000415 
012767 
012701 


104460 
000406 


012767 
012701 


104460 
012700 
104441 
005067 


104401 


PART 
- MRSSTA 


154116 


EL 
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155620 


3* 
; ERROR REPORTS: 


10$: 


60$: 


sREPORT MR BIT CLEAR WITHIN 
: MOV 60 


‘ ;REPORT MR BIT WOULD NOT CLEAR AFTER A DUT RESET 


301. ,ERRNBR :SET THE ERROR NUMBER IN ERROR TABLE. 


MOV 0EM0202, Ri ;SELEC?T ERROR MESSAGE. 

ERROR ;sREPORT ERROR. >>>>> ERROR #0301 <<«<<«< 
TRAP CSERROR 

BR 60$ sEXIT THE TEST. 


10 MS AFTER DUT RESET. 
2. .ERRNBR ;SET THE ERROR NUMBER IN ERROR TABLE. 


MOV 9EM0302 ,R1 sSELECT ERROR MESSAGE. 

ERROR sREPORT ERROR. >>>>» —~ #0302 <<««<< 
RAP CSERROR 

BR 60$ sEXIT THE TEST. 


sREPORT MR CLEARED BETWEEN 1/5 SECOND AND 5 SECONDS OF DUT RESET. 
MOV #0303. ,ERRNBR s;SET THE ERROR NUMBER IN ERROR TABLE. 


MOV 0EM0303, Ri :;SELECT ERROR MESSAGE. 
ERROR sREPORT ERROR. >>>>> a #0303 <«<<<«c< 
RAP CSERROR 
SETPRI @PRIO7 ;DISABLE ALL INTERRUPTS. 
MOV &PRIO7,RO 
TRAP CS$SPRI 
CLR CTRLCF s INDICATE THAT WE COMPLETED THE TEST. 
ENDTST 
10030: 
TRAP CSETST 


SEQ 134 


CZDHUBO DHU-11 
HARDWARE TEST 


FUNC TST 


012700 
104441 
000004 


012767 
012767 
012767 
012767 
012767 


012701 
012702 
005003 


012767 
012701 


104460 
000406 


PARTI 
- RXCHRA 


011610 
000040 
153766 


174062 
171676 


000006 


177476 
000201 


000621 
005651 


Fil 
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155440 


.SBTTL HARDWARE TEST 


3;¢* SESESEESEESESSESEEBESEEEEDESEEESEEEEEAREDAAEDEEAAAAEDEDDEEREEEEAEAEDEEEEDSAEDS 


- RXCHRA - 


:* - RBUF REGISTER RX CHARACTER FIELD TEST - 
:4 THIS TEST VERIFIES THAT THE RX CHARACTER FIELD OF THE DUT RBUF REGISTER 
:* APPEARS TO BE FUNCTIONING CORRECTLY. THIS TEST USES THE CODES WHICH 
;* SHOULD BE IN THE FIFO AFTER A BOARD RESET AND SKIP SELFTEST SEQUENCE. 
;* 
$-- SEBOEESEBEAEEESEESESESEDELEAOEAEEEEEEEEEEEADADEASEAAAREREALADAEEDERESADEALES 
BGNTST 
SETPRI #PRIOS sALLOW LTC INTERRUPTS. 
MOV @PRIOS .RO 
TRAP C$SPRI 
TNUM == TNUM + 1 sINCREMENT THE ASSEMBLY TIME TEST COUNTER. 
MOV @TNUM, TSTNUM sSET UP THE TEST NUMBER. (4) 
MOV ®-1,CTRLCF sINDICATE THAT WE ARE WITHIN A TEST. 
MOV #1,ERRTYP sSET ERROR TYPE AS FATAL IN ERROR TABLE. 
MOV EMO401,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 
MOV PERO2O1,ERRBLK ;SET ERROR ROUTINE ADDRESS IN ERROR TABLE. 


3° 
; SET THE DUT CSR MASTER RESET (MR) BIT, PERFORM 


THE SKIP SELFTEST SEQUENCE, 


; AND WAIT UP TO 5S SECONDS FOR THE MR BIT TO CLEAR. 


BCC 


2s: 


#5000. ,R1 
SBITOS Re 
R3 
CSRA,R4 
R2,(R4) 


PC,SKPSTS 
Co 


CR4)+,RO 
#6 ,.R1 
CR4),R2 
R2,RO 
177476,RO0 
RO, #201 


3¢ 
; ERROR REPORTS: 


4$; 


#0401 » »ERRNBR 
GEMO202 ,R1 


60$ 


;TIME-OUT VALUF IS 5.0 SECONDS. 
sWAITING FOR MASTER RESET BIT. 
sWAITING FOR BIT TO CLEAR. 

sBIT IS IN THE DUT'S CSR. 

3SET THE DUT MASTER RESET BIT. 

3SKIP THE SELFTEST. 

sWAIT FOR DUT_CSR_MR BIT TO CLEAR. 
3GO REPORT ERROR IF MR DID NOT CLEAR. 


3° 
; eo * CHARACTERS FROM THE DUT AND VERIFY THAT THEY ARE VALID SELFTEST 


s INCREMENT POINTER TO POINT TO DUT RBUF REGSTR. 
sINITIALIZE THE LOOP COUNTER. 
sREAD A CHARACTER FROM THE DUT RBUF REGISTER. 


sREMOVE ALL BUT BITS SPECIFIC TO SELFTEST CODE. 
sCHECK THAT BITS 0.6. AND 7 ARE CORRECT. 

:GO REPORT ERROR IF CODE IS NOT SELFTEST CODE. 
sCOUNT THIS LOOP ITERATION. 

sLOOP IF NOT ALL LINES DONE. 

sEXIT TEST, NO ERROR FOUND. 


re MR BIT WOULD NOT CLEAR AFTER A DUT RESE 
Vv 

MOV 
RROR 


a 
sSET THE ERROR NUMBER IN ERROR TABLE. 
sSELECT ERROR MESSAGE. 
;REPORT ERROR. >»>>>> ERROR 80401 ««<<« 
TRAP CSERROR 


sEXIT THE TEST, 


sREPORT IMPROPER CODE FOURMD IN DUT RBUF AFTER RESET (SKIP SELFTEST). 


SEQ 


135 


Gil 


. F TST PART MACRO M -MAR - : Pp - S 
GARDURS, Ofte’: $1 UNC TS iy to ACRO ™1200 15 84 09:15 AGE 103-1 FQ 1346 
5234 026340 012767 000622 155422 63: MOV #0402. ,.ERRNBR ;SET THE ERROR NUMBER IN ERROR TABLE. 
5235 026346 012701 007015 MOV 9EM0402 ,R1 ;SELECT ERROR MESSAGE. 
5236 026352 ERROR sREPORT ERROR. >>>>> ERROR #0402 <«<«<«<< 
5237 026352 104460 TRAP CsERROR 
5238 026354 60$: SETPRI 9PRIO7 :DISABLE ALL INTERRUPTS. 
026354 012700 000340 MOV #PRIO7,RO 
026360 104441 TRAP CsSPRI 
5239 026362 005067 153720 CLR CTRLCF ; INDICATE THAT WE COMPLETED THE TEST. 
5240 026366 ENDTST 
026566 L10031: 


026366 104401 TRAP CseTst 


Hil 
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026370 


012/67 


012701 
oseooe 


012767 
012701 


104460 
000406 


012767 


011610 
000040 
153570 


173664 
171500 


000010 
070000 


000765 
005651 


000 766 


153720 
153674 
155346 
155344 
155340 


155246 


155230 


-SBTTL HARDWARE TEST - RXFFDA - 


;*¢ SESESESERESERSEEESESEEED A SEBDESEASEADASEEEAEEEEADEREDEEEDEEEDEADREH EDD EADDESS 


;* - RBUF REGISTER RX FLAG FIELD TEST - 

34 THIS TEST VERIFIES THAT THE FIELD OF 3 FLAG BITS IN THE RBUF READS 

34 AS ALL ONES WHEN THE SELFTEST CODES ARE BEING READ FROM THE DUT 

34 AFTER A BOARD RESET AND SKIP SELFTEST SEQUENCE. 

;* 

t-- SESESSEEEEBEEESESEASESEREDEEEERESEEEEASEEAEAEEEEAEDEAEEAEEEEEEDEEEEEBEHAEADDS 
BGNTST 
SETPRI #PRIOS sALLOW LTC INTERRUPTS. 


MOV oPRIOS RO 
TRAP C$SPRI 

s INCREMENT THE ASSEMBLY TIME TEST COUNTER. 

;SET UP THE TEST NUMBER. (5) 

sINDICATE THAT WE ARE WITHIN A TEST. 

;SET ERROR TYPE AS FATAL IN ERROR TABLE. 


MOV MEMOSO1L.,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 

MOV ®€RO201,ERRBLK ;SET ERROR ROUTINE ADDRESS IN ERROR TABLE. 
3* 
; SET THE DUT CSR MASTER RESET (MR) BIT, PERFORM THE SKIP SELFTEST SEQUENCE, 
; AND WAIT UP TO 5 SECONDS FOR THE MR BIT TO CLEAR. 
5:2 

MOV #5000. ,.R1 ;TIME-OUT VALUE IS 5.0 SECONDS. 

MOV &BITOS,R2 sWAITING FOR MASTER RESET BIT. 

CLR R3 sWAITING FOR BIT TO CLEAR. 

MOV CSRA,R4 sBIT IS IN THE DUT‘S CSR. 

MOV R2,(R4) sSET THE DUT MASTER RESET BIT. 

JSR PC ,SKPSTS ;SKIP THE SELFTEST. 

JSR C,.MSLGET sWAIT FOR DUT_CSR_MR BIT TO CLEAR. 

BCC :GO REPORT ERROR IF MR DID NOT CLEAR. 


3? 

; READ 8 CHARACTERS FROM THE DUT AND VERIFY THAT ALL 3 RX ERROR FLAGS ARE 
; SET FOR EACH CHARACTERS. 

37 


MOV (R4)+,RO s INCREMENT POINTER TO POINT TO DUT RBUF REGSTR. 
MOV - oR sINITIALIZE THE LOOP COUNTER. 
2s: ae Teale ho sREAD A CHARACTER FROM THE DUT RBUF REGISTER. 
¥ ‘ 
BIC R2,RO sCALCULATE BIT MAP OF CLEAR RX ERROR FLAGS. 
BNE 6$ 3GO REPORT ERROR IF NOT ALL RX ERROR FLAGS SET. 
DEC Ri sCOUNT THIS LOOP ITERATION. 
BNE 2s sLOOP IF NOT ALL LINES DONE. 
BR 60$ sEXIT TEST, NO ERROR FOUND. 


3;* 
; ERROR REPORTS: 
siecsis MR BIT WOULD NOT CLEAR AFTER A DUT RESET. 
V 


4%; #0501. ,ERRNBR ;SET THE ERROR NUMBER IN ERROR TABLE. 
MOV GEMO202 ,R1 sSELECT ERROR MESSAGE. 
ERROR sREPORT ERROR. >>>>> ERROR @0501 «<«<«<«< 
TRAP CSERROR 
BR 60$ sEXIT THE TEST. 
sREPORT ONE OR MORE RX ERROR FLAGS FOUND CLEAR WITH SELFTEST CODE. 
6$; MOV #0502. ,ERRNBR ;SET THE ERROR NUMBER IN ERROR TABLE. 


SEG 137 


CZ0HUBO DHU-11 
MARDWARE TEST 


5295 026540 
5296 026544 


5298 026546 
026546 


026552 
5299 026554 
5300 026560 
026560 
026560 
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- RXFFDA . 


012701 
104460 


012700 
104441 
005067 


104401 


007241 


000340 
153526 


60$: 


ERROR 


MOV 


9EMO502 ,R1 


SETPRI 4PRIO7 


ENDTST 


CLR 


CTRLCF 


Til 


;sSELECT ERROR MESSAGE. 
;REPORT ERROR. >»>>>> ERROR #0502 <<<<< 


TRAP CSERROR 


;DISABLE ALL INTERRUPTS. 
MOV #PRIO7,RO 
TRAP C$SPRI 
s INDICATE THAT WE COMPLETED THE TEST. 


L1003e: 
TRAP CSsETST 


SEQ 138 


O Oru -11 F 


CZ0HUB 
HARDWARE 


TEST 


026570 
026576 
026604 


026726 


Jil 
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012700 
104441 


012767 
012767 
012767 
012767 
012767 


012701 
012702 
005003 


103016 


032714 
001422 


012705 
010403 


012767 
012701 


104460 


000240 


000006 
177777 


900001 
007575 
016042 


011610 
000040 


153376 


173472 
171306 


000200 


001150 


000200 


001131 
005651 


155146 


155046 


-SBTTL HARDWARE TEST 


- RDAA - 


;¢* SPSSAEEESESESESEESESEESEREREESAAEAEHEEREAEEEEEEEEAEEAEREEEREEEDEEAAEAEADEESS 


34 - CSR RX DATA AVAILABLE BIT TEST - 
34 THIS TEST VERIFIES THAT THE DUT CSR RX DATA AVAILABLE BIT IS SET BY THE 
;* INCLUSION OF THE SELFTEST CODES IN THE DUT FIFO AND THAT THE BIT CLEARS 
;@ AFTER THE FIFO HAS BEEN EMPTIED. 
;* 
$-- PEEEESEOESEEEESESESESESEEESSEEEEEEEEEEEEEEREAAEAEEEEEERERERODAEDRAEAEEALEEEES 
BGNTST 
SETPRI 4PRIOS ;sALLOW LTC INTERRUPTS. 
MOV #PRIOS,RO 
TRAP CSSPRI 
TNUM == TNUM + 1 s INCREMENT THE ASSEMBLY TIME TEST COUNTER. 
MOV @TNUM, TSTNUM ;sSET UP THE TEST NUMBER. ) 
MOV #-1,CTRLCF s INDICATE THAT WE ARE WITHIN A TEST. 
MOV #1,ERRTYP ;SET ERROR TYPE AS FATAL IN ERROR TABLE. 
MOV ®EMO601,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 
MOV #ERO2O1,ERRBLK ;SET ERROR ROUTINE ADDRESS IN ERROR TABLE. 


;* 
; SET THE DUT CSR MASTER RESET (MR) BIT, PERFORM 


; AND WAIT UP TO S SECONDS FOR 
- 


MOV *s 
MOV &BITOS,R2 
CLR R3 
MOV CSRA,R4 
MOV R2,(R4) 
JSR PC,.SKPSTS 
JSR PC ,MSLGET 
BCC 4a$ 
5° 
; CHECK THAT 
5 = 
BIT oBIT7,CR4) 
BEQ 63% 


THE SKIP SELFTEST SEQUENCE, 
THE MR BIT TO CLEAR. 


;TIME-OUT VALUE IS 5.0 SECONDS. 
sWAITING FOR MASTER RESET BIT. 
sWAITING FOR BIT TO CLEAR. 

sBIT IS IN THE DuT’S CSR. 

sSET THE DUT MASTER RESET BIT. 

;SKIP THE SELFTEST. 

sWAIT FOR DUT_CSR_MR BIT TO CLEAR. 
sGO REPORT ERROR IF MR DID NOT CLEAR. 


THE RX DATA AVAILABLE BIT IS SET. 


sTEST THE DUT RX.DATA.AVAIL BIT. 
3GO REPORT ERROR IF BIT IS NOT SET. 


; READ CHARACTERS FROM THE DUT RX FIFO AND WAIT FOR RX.DATA.AVAIL TO GO CLEAR. 


MOV 9600. ,R5 
MOV R4,R3 
2s: MOV CR3),RO 

BIT BIT7,CR4) 
BEQ 60$ 

DEC RS 
BNE es 

BR 8&$ 


3;* 
; ERROR REPORTS: 


4$: #0601., 
MOV 9EM0202 ,R1 
ERROR 


sALLOW READING 600 CHARS BEFORE ERROR. 


;CALCULATE THE RBUF ADDRESS. 

sREAD A CHARACTER FROM THE Rx FIFO. 

sTEST THE DUT RX.DATA.AVAIL BIT. 

sEXIT TEST WITHOUT ERROR IF RX.DATA.AVAIL CLR. 
;COUNT THE CHARACTER JUST READ. 

;LOOP IF NOT TOO MANY CHARS READ FROM FIFO. 

;GO REPORT ERROR IF RX.DATA.AVAIL WOULDN'T CLR. 


sREPORT MR BIT WOULD NOT CLEAR AFTER A DUT RESET 
MOV 


;SET THE ERROR NUMBER IN ERROR TABLE. 

;SELECT ERROR MESSAGE. 

;REPORT ERROR. >>>>> ERROR #0601 <«««<<< 
TRAP CSERROR 


HARDWARE TEST) "UNC TST 


5355 
56 


026730 


026732 
026740 


360 026744 


026744 
026746 


026776 


000415 
012767 
012701 
104460 
000406 
012767 
012701 
104460 
012700 


104441 
005067 


104401 


e ROAR 


001132 
007637 


001133 
010017 


000340 
153310 


Ki 1 


MACRO M1200 15-MAR-84 09:15 PAGE 105-1 


155030 6%: 


155012 8$: 


60$: 


BR 60$ ;sEXIT THE TEST. 
sREPORT THAT RX.DATA.AVAIL BIT WAS NOT SET AFTER A RESET COMPLETION. 
MOV #0602. , ERRNBR ;SET THE ERROR NUMBER IN ERROR TABLE. 
MOV #EMO602 ,R1 ;SELECT ERROR MESSAGE. 
ERROR ;REPORT ERROR. >>>>> ERROR #0602 <«<<<< 
TRAP CSERROR 
BR 60$ sEXIT THE TEST. 
sREPORT THAT RX.DATA.AVAIL BIT COULD NOT BE CLEARED By PURGING FIFO. 
MOV #0603. ,ERRNBR ;SET THE ERROR NUMBER IN ERROR TABLE. 
MOV #EMO603,R1 ;SELECT ERROR MESSAGE. 
ERROR ;sREPORT ERROR. >>>>> ERROR #0603 <«<<<«<c< 
TRAP CSERROR 
SETPRI #PRIO7 sDISABLE ALL INTERRUPTS. 
MOV #PRIO7,RO 
TRAP C$SPRI 
etter CTRLCF sINDICATE THAT WE COMPLETED THE TEST. 


L10033: 
TRAP CSETST 


SEQ 140 


RARDUARE TESt. 


027070 
027074 


027076 
027100 
027102 


027120 


027122 


027136 
4 


012767 


012701 
012702 
005003 
103012 


012400 
005714 
100016 


012705 


012767 


012701 


104460 
000415 


000240 


000007 
177777 
000001 
010202 


016042 
011610 
000040 
153160 


173254 
171070 


001130 


001275 
005651 


153310 


154640 


Lii 
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.SBTTL HARDWARE TEST - ROVA - 
FHF SHREBEEEEESEESSEAESEEEAESEASEREREEEEEEEAEREEREAEAEAEREREREREEEAEEREREREEEEES 


;* - RBUF RX DATA VALID BIT TEST - 
;4 THIS TEST VERIFIES THAT THE DUT RBUF RX DATA VALID BIT IS SET BY THE 
:* INCLUSION OF THE SELFTEST CODES IN THE DUT FIFO AND THAT THE BIT CLEARS 
3:4 AFTER THE FIFO HAS BEEN EMPTIED. 
;* 
$-- SESLEEEAREBEEEBEEEEEAEEEEEREEAEEESEEEEEEEEEAEEEAAEEEREEEEAEAEREREEERER EERE ES 
BGNTST 
SETPRI #PRIOS sALLOW LTC INTERRUPTS. 
MOV oPRIOS,RO 
TRAP CS$SPRI 
TNUM == TNUM + sINCREMENT THE ASSEMBLY TIME TEST COUNTER. 
MOV @TNUM, TSTNUM ;SET UP THE TEST NUMBER. (7) 
MOV #-1,CTRLCF sINDICATE THAT WE ARE WITHIN A TEST. 
MOV #1,ERRTYP ;SET ERROR TYPE AS FATAL IN ERROR TABLE. 
MOV EMO701,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 
MOV 9ERO201,ERRBLK ;SET ERROR ROUTINE ADDRESS IN ERROR TABLE. 


+ 


; 

; SET THE DUT CSR MASTER RESET (MR) BIT, PERFORM THE SKIP SELFTEST SEQUENCE. 
; AND WAIT UP TO 5 SECONDS FOR THE MR BIT TO CLEAR. 

ee 


MOV ee ;TIME-OUT VALUE IS 5.0 SECONDS. 
MOV @BITOS,R2 sWAITING FOR MASTER RESET BIT. 
CLR R3 sWAITING FOR BIT TO CLEAR. 
MOV CSRA,R4 sBIT IS IN THE DUT’S CSR. 
MOV R2,(R4) ;SET THE DUT MASTER RESET BIT. 
JSR PC,SKPSTS ;SKIP THE SELFTEST. 
JSR PC ,MSLGET sWAIT FOR DUT_CSR_MR BIT TO CLEAR. 
BCC 4$ :GO REPORT ERROR IF MR DID NOT CLEAR. 
;* 
3; CHECK THAT THE RX DATA VALID BIT IS SET. 
bed 
MOV CR4)+,RO s INCREMENT POINTER TO PNT TO DUT RBUF REG. 
TST CR4) sTEST THE DUT RX.DATA.VALID BIT. 
BPL 6% 3GO REPORT ERROR IF BIT IS NOT SET. 
3* 
; READ CHARACTERS FROM THE DUT RX FIFO AND WAIT FOR RX.DATA.VALID TO GO CLEAR. 
MOV sALLOW READING 600 CHARS BEFORE ERROR. 
2s: MOV CR4),RO sREAD A CHARACTER FROM THE RX FIFO. 
BPL 60$ sEXIT TEST WITHOUT ERROR IF BIT IS CLEAR. 
DEC RS sCOUNT THE CHARACTER JUST READ. 
BNE 2s sLOOP IF NOT TOO MANY CHARS READ FROM FIFO. 
BR &$ GO REPORT ERROR IF RX.DATA.VALID WOULDN'T CLR. 


3* 
; ERROR REPORTS: 


sREPORT MR BIT WOULD NOT CLEAR AFTER A DUT RESET. 
4$: MOV #0701.,ERRNBR ;SET THE ERROR NUMBER IN ERROR TABLE. 
MOV MEMO202 ,R1 sSELECT ERROR MESSAGE. 
ERROR sREPORT ERROR. >>>>> ERROR 80701 <<«<« 
TRAP CSERROR 


BR 60$ sEXIT THE TEST. 


SEG 141 


RARDUARE Test 


5425 
5426 
5427 

5428 


027140 


027170 
027170 


027172 


012767 
012701 


104460 
000406 
012767 
012701 
104460 
012700 


104441 
005067 


104401 


FUNC TST PARTS a 2 


001276 
010245 


001277 
010425 


000340 
153102 


MACRO M1200 15-MAR-84 09:15 PAGE 106-1 


154622 6%: 


154604 8$: 


60$: 


sREPORT THAT RX.DATA, ann? BIT WAS NOT SET AFTER A RESET COMPLETION. 


;SET THE ERROR NUMBER IN ERROR TABLE. 
sSELECT ERROR MESSAGE. 
sREPORT ERROR. 


;EXIT THE TEST. 


>>>>> ERROR #0702 <<<«<< 
TRAP CsSERROR 


sREPORT THAT RX.DATA.VALID BIT COULD NOT BE CLEARED BY PURGING FIFO. 


MOV #0702. 

MOV 9€MO702,R1 
ERROR 
BR 60$ 

MOV 90703. ,ERRNBR 
MOV #€MO703, Ri 
ERROR 


SETPRI #PRIO7 


CLR 
ENDTST 


CTRLCF 


;SET THE ERROR NUMBER IN ERROR TABLE. 
;SELECT ERROR MESSAGE. 
;REPORT ERROR. >>>>> ERROR #0703 «<<«<<<< 


TRAP CSERROR 


sDISABLE ALL INTERRUPTS. 
MOV #PRIO7,RO 
TRAP C$SPRI 
sINDICATE THAT WE COMPLETED THE TEST. 


L10034: 


TRAP CSETST 


SEG 142 


HARDWARE TEST 


027212 
027214 


027250 


027274 


027276 


027352 


012767 


012701 
. 12702 
005003 


012767 
012767 
012701 


104460 


000240 
000010 
177777 
000001 
010610 


011610 
000040 
152760 


173054 
170670 


177760 


000010 


001441 
016136 
005651 


153102 
3056 


154430 
154426 


Nit 
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-SBTTL HARDWARE TEST - RLNA - 

;¢¢ cam eee het the tiene eee eT eeeeteseseesetessoseosncasesooses & 

34 RBUF RX LINE NUMBER FIELD eat - 

;* THIS TEST VERIFIES THAT THE DUT RBUF RX LINE NUMBER FIELD IS WORKING 

34 CORRECTLY BY UTILIZING THE SELFTEST CODES WHICH ARE PUT IN THE Rx 

34 FIFO AFTER A BOARD RESET. 

;* 

t-- SEREEEBEREREEREAEEAEEARERERADEREREEEAEEEEAEERAEEAEEAREE AREER EEE EEE E ES 
BGNTST 


SETPRI #PRIOS sALLOW LTC INTERRUPTS. 
4 #PRIOS,RO 
C$SPRI 


TRAP 
s INCREMENT THE ASSEMBLY TIME —eo 


MOV @TNUM, TSTNUM sSET UP THE TEST NUMBER 

MOV @-1,CTRLCF sINDICATE THAT WE ARE WITHIN A TEST. 

MOV #1,ERRTYP ;SET ERROR TYPE AS FATAL IN ERROR TABLE. 
MOV #EMO601,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 


:¢ 
; SET THE DUT CSR MASTER RESET (MR) BIT, PERFORM i SKIP SELFTEST SEQUENCE, 
; AND WAIT UP TO 5 SECONDS FOR THE MR BIT TO CLEAR 


MOV toh ;TIME-OUT VALUE IS 5.0 SECONDS. 
MOV @BITOS,R2 ;WAITING FOR MASTER RESET BIT. 

CLR ;WAITING FOR BIT TO CLEAR. 

MOV  CSRA,R4 ;BIT IS IN THE DUT’S CSR 

MOV R2,(R4) ;SET THE DUT MASTER RESET BIT. 

JSR PC, SKPSTS ;SKIP THE SELFTEST. 

JSR »MSLGET ;WAIT FOR DUT_CSR_MR BIT TO CLEAR. 
BCC 4$ ;GO REPORT ERROR IF MR DID NOT CLEAR. 


3;* 
; 7 att a FROM THE DUT RX FIFO AND VERIFY THAT THE LINE NUMBERS ARE 


5 . 
; EIGHT CHARACTERS ARE READ FROM THE FIFO. 


CLR R1 ;CLEAR THE LINE COUNTER 
MOV CR4)+,RO s INCREMENT POINTER TO PNT TO THE DUT RBUF REG. 
2s: MOV (R4),R2 sREAD A CHARACTER FROM THE DUT RX FIFO. 

MOV R2,R3 

SWAB 3 

BIC #177760,R3 sREMOVE ALL BUT LINE NUMBER BITS. 

CMP R3,R1 ;COMPARE WITH EXPECTED LINE NUMBER 
BNE 6$ :GO REPORT ERROR IF LINE NUMBERS DON’T MATCH. 
INC R1 ; INCREMENT THE EXPECTED LINE NUMBER 

CMP R1,98. sCOMPARE NUMBER OF CODES READ WITH MAX. 
BNE es sLOOP UNTIL CODES FOR ALL LINES ARE READ. 

BR 60$ sEXIT TEST WITHOUT ERROR. 


3+ 
; ERROR REPORTS: 


a 
sREPORT MR BIT WOULD NOT CLEAR AFTER A DUT RESET. 
4$: MOV #0801. ,ERRNBR ;SET THE ERROR NUMBER IN ERROR TABLE. 
#EROSO3, ERRBLK ;SET ERROR ROUTINE ADDRESS IN ERROR TABLE. 
MOV %EM0202,R1 ;SELECT ERROR MESSAGE. 
OR OR. >>>>> ERROR #0801 <««<<<< 


;sREPORT ERR 
TRAP CSERROR 


SEG 14% 


Ble 
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HARDWARE TEST - RLNA - 
aan 027354 000411 BR 60$ sEXIT THE TEST. 
5495 sREPORT THAT RX LINE NUMBER FIELD IS WRONG FOR SELFTEST CODE. 
5496 027356 012767 001442 154404 63: MOV #0802. , ERRNBR sSET THE ERROR NUMBER IN ERROR TABL - 
5497 027364 012767 016136 154402 MOV o€ROSOS, ee sSET ERROR ROUTINE ADDRESS IN ERROR TABLE. 
5498 027372 012701 010656 MOV %EMOBO?2 .R sSELECT ERROR MESSAGE. 
5499 027376 ERROR sREPORT ERROR. >>>>> — @OBO02 «<«ccc 
5500 027376 104460 RAP CSERROR 
5501 027400 603: SETPRI @PRIO?7 sDISABLE ALL INTERRUPTS. 
27400 012700 000340 OPRIO7,RO 
27404 104441 TRAP CsSPRI 
5502 027406 005067 152674 CLR CTRLCF sINDICATE THAT WE COMPLETED THE TEST. 
5503 027412 ENDTST 
27412 L10035: 
027412 104401 TRAP CSETST 


O DHU-11 FUNC TST PARTI 
BMPCHK 


CZ04UB8 
MAROWARE TEST 


027414 


027420 
027422 


012767 


012701 
012702 
005003 


012703 


172632 


000764 
170402 
171014 


152770 
002526 


Cle 
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152674 
52650 


-SBTTL HARDWARE TEST BMPCHK - 


36 teeeaeeeseasaesceaseasseasseseraceasensenscessasssscsnsansanenennassssoncs 
3¢ BMP CHECK TEST - 
34 THIS ge LE a TO VERIFY THAT THE DUT DOES NOT IMMEDIATELY FAIL 


3° THE ON-BO ACKGROUND -MONITOR PROGRAM, AND HENCE INVAL IDATE 

:* SUCCEEDING TESTS. 

34 THIS TEST LOOKS FOR BMP CODES IN THE FIFO FOR A SET PERIOD IMMEDIATELY 

36 pt THE ae « a IS SKIPPED. 

;* Y BMP CODES THAT ARE FOUND ARE SAVED ON THE QUEUE AND ARE ALSO 

34 REPORTED IN THIS. TEST. 

‘ 

“+o SPPESHOEESESOEEEEEEEOEEAEEEEEOESEOEEEEEEOEEEEEEEEEEEEEEEEEEEEEEREDALEEEEAES 
BGNTST 
SETPRI @PRIOS sALLCW LTC INTERRUPTS. 


a OPRIOS ,RO 

RAP CSSPRI 

s INCREMENT THE ASSEMBLY TIME rest oe 
NUMBER 9) 


MOV @TNUM, TSTNUM sSET UP THE TEST 

MOV @-1,CTRLCF sINDICATE THAT WE ARE WITHIN A TEST. 

MOV #1,ERRTYP sSET ERROR TYPE AS FATAL IN ERROR TABLE. 
MOV - 0ERRNBR 3SET THE ERROR NUMBER 


;SET THE ERROR MESSAGE 


3° 
; WAIT UWP TC 3 SECONDS FOR THE DUT MASTER _ BIT TO CLEAR. 
; IF TIM: “Our OCCURS, THEN EXIT THIS TEST 
ge 
MOV #3000. .R1 sTIME-OUT VALUE IS 3.0 SECONDS. 
MOV eBITOS,R2 sWAITING FOR MASTER RESET BIT. 
CLR R3 sWAITING FOR BIT TO CLEAR. 
MOV CSRA,R4 s6IT IS IN THE DUT'S CSR. 
JSR PC ,MSLGET sWAIT FOR DUT_CSR_MR BIT TO CLEAR. 
BCC 50% sABORT THE TEST IF MR DID NOT CLEAR. 
3° 
; RESET THE DUT, SKIP THE SELF-TEST. 
3” 
MOV R2,(R4) sSET THE DUT MASTER RESET BIT 
JSR PC, SKPSTS SWALTE THE SKIP SELFTEST CODES TO THE DUT. 


$¢ 

; ee Ad MASTER RESET TO CLEAR. DELAY FOR 500 MILLI-SECS BEFORE PURGING 
@ 

is 


MOV 0500., sTIME-OUT VALUE IS 500 MILLI-SECONDS. 

JSR PC DELAY sWAIT FOR BMP TO BEGIN EXECUTION. 

JSR PC .PUF IFO sPURGE THE FIFO, SAVING ANY 

BCC $ sABORT THE TEST IF THE FIFO DID NOT CceaR, 


3° 
; REPORT THE ERROR IF ANY BMP CODES WERE FOUND. 


MOV BMPCGP ,R2 sGET THE CONTENTS OF THE POINTER TO THE BMP Q. 
MOV OBMPCOB RS sGET THE START ADDRESS OF THE QUEUE. 

CMP R2,R3 sSEE IF THE POINTER HAS MOVED FROM THE BASE. 
BEQ 60% sEXIT NO CODES IN THE QUEVE. 


3* 
; THERE IS AT LEAST ONE BMP CODE IN THE QUEUE. REPORT THE ERROR. 
Soe 

sREPORT ERROR BMP CODE FOUND IN TEST NN, BMP CODE :NNNNNN” 


SEQ 145 


O DMU-11 FUNC TST 


CZ0HUB8 

MAROWARE 
5559 
5560 


TEST 
027544 


027562 


564 027570 
566 027574 


027574 
02 


012701 
104455 
001605 
010726 
017262 
000405 


012767 
004767 


012700 
104441 
005067 


104401 


PARTI 
- BMPC 


010766 


orc 154200 50%: 


1726 


000340 
152500 


MACRO M1200 
HK 


60$: 


MOV 
ERRDF 


CLR 
ENDTST 


o€ 


60$ 


#902. ,E 
PC, TSABRT 


oPRIO7 


CTRLCF 


D12 
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M0902 ,R1 
0901 .EM0901 ,ER93 


3PASS THE MESSAGE TO BE REPORTED. 


Ol ; >>>>> ERROR @0901 <<«ccc, 
TRAP 
. WORD 
. WORD 
. WORD 
sSET >>>>> ERROR 00902 <<<<<, 
sREPORT NON-TEST RELATED ERROR. 
;DISABLE ALL INTERRUPTS. 
MOV 
TRAP 
; INDICATE THAT WE COMPLETED THE TEST. 
L10036: 
TRAP 


CSERDF 
901 

EMO901 
ER9301 


OPRIO7,RO 
C$SPRI 


CsETST 


SEQ 146 


CZ01iUB0 


DHU-11 


HARDWARE TEST 


027610 


027614 
027616 


96 027672 


027724 
0 


027726 
027734 
027740 


2 
027742 


012700 
104441 
000012 
012767 
012767 
012767 
012767 
012767 


012701 
012702 
00500 


010214 
67 


012767 
004767 
000423 


012767 


FUNC TST PARTI 
- BMPCHK 


000240 


000012 
177777 


000001 
011022 
016136 


011610 
000040 


152350 
170266 


000062 


172432 
170246 


000050 


001753 
171554 


001751 


Ele 
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154034 


154020 


-S6TTL HARDWARE TEST - SKSELF - 

E+ F SEBMSESESESESESSSESEEEEEASESEESEDESEEALEEEAE DEED EDEDEREDEEREDEEEEDDDDEDARELS 
:* - SKIP SELF-TEST TEST - 

3¢ THIS TEST VERIFIES THAT THE DUT SKIPS THE SELF-TEST WITHIN THE 


34 TIME ALLOWED, AND THAT THE FIFO CONTAINS THE CORRECT CODES AFTER ITS 
3 COMPLETION. 
3* 
5 -- SHHOODESSSEEESSEEEDESEDAEASADEDEDEOEEEEEEEEEEEDEDEDEERERAREEEDEEDDDEDREDEDELS 
BGNTST 
T10:: 
SETPRI #PRIOS sALLOW LTC INTERRUPTS. 


MOV OPRIOS ,RO 
TRAP C$SPRI 

s INCREMENT THE ASSEMBLY TIME TEST COUNTER. 
3SET UP THE TEST NUMBER. (10) 
sINDICATE THAT WE ARE WITHIN A TEST. 


MOV #1,ERRTYP sSET ERROR TYPE AS FATAL IN ERROR TABLE. 
MOV EM1001,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 
MOV @EROSOS.ERRBLK ;SET ERROR ROUTINE ADDRESS IN ERROR TABLE. 


3* 
; WAIT UP TO S SECONDS FOR THE DUT MASTER RESET BIT TO CLEAR. 
; If TIME-OUT OCCURS, THEN EXIT THIS TEST. 


MOV #5000. .R1 ;TIME-OUT VALUE IS 5.0 SECONDS. 
MOV €BITOS,R2 sWAITING FOR MASTER RESET BIT. 
CLR R3 sWAITING FOR BIT TO CLEAR. 
MOV CSRA,R4 sBIT IS IN THE DUT’S CSR. 
JSR PC .MSLGET ;WAIT FOR DUT_CSR_MR BIT TO CLEAR. 
BCC Sos s;ABORT THE TEST IF MR DID NOT CLEAR. 
3° 
s DETERMINE IF THE DUT TAKES TOO SHORT OR TOO LONG A TIME TO SKIP THE SELF -IEST 
; SET-UP A TIME-OUT OF SO MILLI-SECOND., IF MR IS CLEAR IN LESS THAN 10 MILLI 
;  -SECOND, OR GREATER THAN 50 MILLI-SECONDS, REPORT THE ERROR. 
g- 
MOV #50. ,R1 ;TIME-OUT VALUE IS SO MILLI-SECONDS. 
MOV R2,(R4) :SET THE DUT MASTER RESET BIT. 
JSR PC. SKPSTS s;sWRITE THE SKIP SELFTEST CODES TO THE DUT. 
JSR »MSLGET sWAIT FOR DUT_CSR_MR BIT TO CLEAR. 
yi at oe sGO REPORT ERR IF SKIPPING STEST TOOK TOO LONG. 
BGT 4$ ;GO REP ERR IF SELFTEST COMPLETED IN < 10 MS. 


3? 

; SELF-TEST COMPLETED WITHIN 10 MILLI-SEC TO SO MILLI-SECONDS. 

3s VERIFY THAT THE SELF-TEST CODES IN THE FIFO ARE "GOOD" CODES ,IE THE DUT 
; SUCCESSFULLY COMPLETED THE SELF-TEST. 

; THIS SUBROUTINE REPORTS ERRORS WITH NUMBERS >>>>> 1003 THRU 1007 <<«««<, 


MOV #1003.,ERRNBR ;SET ERROR NUMBER TO 1003. 
JSR PC, RSTRPT sCHECK SELF-TEST CODES IN THE FIFO. 
BR 60$ sEXIT TEST. 
3¢ 
; ERROR REPORTS: 
sREPORT SKIP SELF-TEST TOOK TOO LONG. 
2s: MOV #1001. ,ERRNBR sSET THE ERROR NUMBER IN THE ERROR TABLE. 


SEG 147 


RARDWARE Test 


027774 


34 027776 
030004 


FUNC TST 


012701 
104460 
000414 
012767 
012701 
104460 
000405 


012767 
004767 


012700 
104441 
005067 


104401 


Fle 
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011055 


001752 
011142 


001753 


172462 


000340 
152264 


154002 4%: 


153764 50%: 


60%: 


L10037: 
TRAP 


>>>>> ERROR @1001 <««<<<< 
CsERROR 


>>>>> — #1002 <«<<««<« 
CsERROR 


oPRIO7,RO 


C$SPRI 


MOV #EM1002,R1 sSELECT ot a. 
ERROR ;REPORT ERR 
TRAP 
BR 60$ sEXIT THE TEST. 
sREPORT SKIP SELF - ye COMPLETED TOO SOON. 
MOV #1002. ,ERRNBR sSET THE ERROR NUMBER IN THE ERROR TABLE. 
MOV 0€M1003, R1 ;SELECT ERROR MESSAGE. 
ERROR sREPORT ERROR. 
RAP 
BR 60$ sEXIT THE TEST. 
MOV #1003. ,ERRNBR ;SET ERROR NUMBER. 
JSR PC, TSABRT ;REPORT NON-TEST RELATED ERROR. 
SETPRI #PRIO7 sDISABLE ALL. INTERRUPTS. 
MOV 
TRAP 
cubrer CTRLCF s INDICATE THAT WE COMPLETED THE TEST. 


CsETsT 


SEQ 148 


SARDUSEE on st 


030114 
030116 


030162 


012700 
104441 
000013 
012767 
012767 
012767 
012767 
012767 


012701 
012702 
005003 


103044 


010214 
004767 


012701 
012702 


012701 
005003 
004767 
103012 
010105 


000240 
000013 
177777 


000001 
011220 
016136 


011610 
000040 


152134 
170052 


172222 


000005 
020000 


152102 
170020 


000017 
170004 


152264 
152240 
153712 
153710 
153704 


Gle 
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.S6TTL HARDWARE TEST - OFSKST - 


se SPSSSEOEESEEEABOEEAESESEEEEESEEESEDEADEAEREDEEDEEEEEREEEEEEREMEEEEREDEEESSS 


34 - DIAGNOSTIC FAIL BIT, SKIP SELF-TEST TEST - 
;8 THIS TEST VERIFIES THAT THE DIAGNOSTIC FAIL BIT OF THE DUT, CORRECTLY 
34 CHANGES STATE AS THE ON-BOARED SELFTEST IS SKIPPED. 
;* 
$-- PESSESEBESEEDESESEEEEEEEEEAEAEREEEEEEDEEEHEEAEEEEDEEDDEDEREREREDAEEEEEEAEEES 
sT 
T1l:: 
SETPRI #PRIOS sALLOW LTC INTERRUPTS. 


MOV oPRIOS ,RO 
P C$SPRI 


TRA 
TNUM == TNUM + 1 s INCREMENT THE ASSEMBLY TIME TEST COUNTER. 
NUMBER ) 


MOV &TNUM, TSTNUM ;SET UP THE TEST ‘ C11 

MOV @-1,CTRLCF sINDICATE THAT WE ARE WITHIN A TEST. 

MOV #1,ERRTYP sSET ERROR TYPE AS FATAL IN ERROR TABLE. 
MOV #EM1101,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 
MOV @EROSOS,ERRBLK ;SET ERROR ROUTINE ADDRESS IN ERROR TABLE. 


3° 
; WAIT UP TO 5 SECONDS FOR THE DUT MASTER RESET BIT TO CLEAR. 
; IF TIME-OUT OCCURS, THEN EXIT THIS TEST. 

ig 


MOV #5000. ,R1 ;TIME-OUT VALUE IS 5.0 SECONDS. 
MOV eBITOS,R2 sWAITING FOR MASTER RESET BIT. 
CLR R3 sWAITING FOR BIT TO CLEAR. 
MOV CSRA,R4 sBIT IS IN THE DUT’S CSR. 
JSR PC .MSLGET sWAIT FOR DUT_CSR_MR BIT TO CLEAR. 
BCC 50$ sABORT THE TEST IF MR DID NOT CLEAR. 
3 * 
; RESET THE DUT, SKIP THE SELF-TEST. 
3 = 
MOV R2,(R4) sSET THE DUT MASTER RESET BIT. 
JSR PC.SKPSTS sWRITE THE SKIP SELFTEST CODES TO THE DuT. 


T TIME OUT OF 5S MILLI SECONDS, WAIT FOR DIAG_FAIL BIT TO SET. 
F TIME-OUT OCCURS GO REPORT THE ERROR. 


;TIME-OUT VALUE IS S MILLI-SECONDS. 
sWAITING FOR DIAGNOSTIC FAIL BIT. 


mm 


MOV Re ,RS sWAITING FOR BIT TO SET. 

MOV CSRA,R4 s6IT IS IN THE DUT'S CSR. 

JSR PC ,MSLGET sWAIT FOR DUT_CSR_DF BIT TO CLEAR. 

Bcc sIF OIAG_FAIL DID NOT SET, GO REPORT ERROR. 


3 * 

; SET TIME-OUT OF 15 MILLI-SECS, WAIT FOR DIAG_FAIL TO CLEAR. 

; IF TIME-OUT OCCURS GO REPORT THE ERROR. 

; VERIFY THE OIAG_FAIL BIT IS IN A STABLE STATE BEFORE CONTINUING. LOOP 

; BACK IF THE STATE WAS TRANSITORY, USING THE REMAINDER OF THE 15 MS TIME-OUT. 
3 - 


MOV #15. ,R1 sTIME-OUT VALUE IS 15 MILLI-SECONDS. 
2s: CLR R3 sWAITING FOR BIT TO CLEAR. 
JSR PC ,MSLGET sWAIT FOR DUT_CSR_DF BIT TO CLEAR. 
BCC 4% IF DIAG _FAIL DID NOT CLEAR, GO REPORT ERROR. 
MOV R1,R5 sSAVE THE REMAINING TIME-OUT VALUE. 


SEQ 149 


H1le 


C DH - F TST PART MACRO M1200 5-MAR-84 09:15 P - c 
Cz RRURO Test? UNC TS SOF eKST AC 12 1 1 AGE 110-1 SEQ 150 
5695 030164 012701 000001 MOV #1,R1 ;SET TIME-OUT OF 1 MILLI-SECOND. 
5696 030170 052703 020000 BIS #B1IT13,R3 ;WAIT FOR BIT TO SET. 
5697 030174 004767 167764 JSR PC .MSLGET sDOUBLE CHECK TO ELIMINATE NOISE PROBLEMS. 
5698 030200 103016 BCC 60$ sEXIT IF DIAG_FAIL BIT STILL CLEAR. 
5699 030202 010501 MOV RS5S,R1 sPASS THE REMAINING TIME-OUT VALUE. 
oer 030204 000762 BR es ;LOOP TO CHECK AGAIN. 
;* 
5702 ; ERROR REPORTS: 
5703 3- 
5704 sREPORT DIAGNOSTIC FAIL BIT BAD. 
5705 030206 012767 002115 153554 43: MOV #1101. ,ERRNBR ;SET THE ERROR NUMBER IN THE ERROR TABLE. 
5706 030214 012701 011517 MOV 9EM1205,R1 ;SELECT ERROR MESSAGE. 
5797 030220 ERROR ;REPORT ERROR. >>>>> ERROR #1101 «<<< 
030220 104460 TRAP CSERROR 
th 030222 000405 AR 60$ sEXIT THE TEST. 
5710 030224 012767 002116 153536 503: MOV #1102. ,ERRNBR ;SET THE ERROR NUMBER FOR TSABRT RIN. 
Sots 030232 004767 172234 JSR PC, TSABRT sREPORT NON-TEST RELATED ERROR. 
5713 030236 60$: SETPRI #@PRIO7 sDISABLE ALL INTERRUPTS. 
030236 012700 000340 MOV @PRIO7,RO 
030242 104441 TRAP CS$SPRI 
5714 030244 005067 152036 CLR CTRLCF ; INDICATE THAT WE COMPLETED A TEST. 
5715 030250 ENDTST 


030250 L10040: 
030250 104401 TRAP CSETST 


CZDHUBO DHU-11 FUNC TST PARTI 
HARDWARE TEST SELF 


012767 


012701 
012702 


032714 
001412 


012767 
012701 


104460 


000240 


000014 
177777 
000001 
011273 
016136 


011610 
000040 


151706 
167624 


011610 
167610 
011610 
000062 
000764 


020000 


002264 
011517 


153354 


Iie 
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-SBTTL HARDWARE TEST - SELFTS - 


se SPRSSEESSESESESEEESESEEAAEEEEESAESERAEEAEAROEEEAADEEAEREREEREREEREDLAAEEESEESS 


34 - SELF-TEST TEST - 
34 THIS TEST VERIFIES THAT THE DUT'S SELF-TEST EXECUTES WITHIN THE 
7 TIME ALLOWED, AND THAT THE FIFO CONTAINS THE CORRECT CODES AFTER ITS 
;* COMPLETION. 
;* 
g-- etn enaeeeneaeeeessasaneeesesaneesesseenssneesenennonece 

BGNTS 

Tle:: 
SETPRI #@PRIOS ;ALLOW LTC INTERRUPTS. 
ed #PRIOS,RO 
2 eens 


RAP 
TNUM == TNUM «+ 1 s INCREMENT THE 7 een TIME TEST COUNTE 


MOV #TNUM, TSTNUM ;SET UP THE TEST (12) 

MOV -1,CTRLCF sINDICATE THAT WE ARE WITHIN A TEST. 

MOV #1,ERRTYP sSET ERROR TYPE AS FATAL IN ERROR TABLE. 
MOV #€M1201,ERRMSG :SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 
MOV MEROSOS,ERRBLK ;SET ERROR ROUTINE ADDRESS IN ERROR TABLE. 


;* 

; WAIT UP TO S SECONDS FOR THE DUT MASTER none BIT TO CLEAR. 
; IF TIME-OUT OCCURS, THEN EXIT THIS TEST 

3 < 


MOV #5000. ,R1 ;TIME-OUT VALUE IS 5.0 SECONDS. 

MOV #BITOS,Re2 sWAITING FOR MASTER RESET BIT. 

CLR R3 sWAITING FOR BIT TO CLEAR. 

MOV CSRA,R4 sBIT IS IN THE DUT’S CSR. 

JSR PC .MSLGET sWAIT FOR DUT_CSR_MR BIT TO CLEAR. 
BCC 50$ sABORT THE TEST IF MR DID NOT CLEAR. 


; "DETERMINE IF THE SELF-TEST TAKES TOO SHORT OR TOO LONG A TIME TO COMPLETE. 
; SET-UP A_TIME-OUT OF S SECOND, IF MR IS CLEAR IN LESS THAN 1/2 SECOND. OR 
; GREATER THAN 5 SECONDS, REPORT THE ERROR. 

* 


MOV sTIME-OUT VALUE IS 5.0 SECONDS. 

MOV R2,(R4) 3SET THE DUT MASTER RESET BIT 
JSR PC ,MSLGET sWAIT FOR DUT_CSR_MR BIT TO CLEAR. 
BCC 4% :GO REPORT ERROR SELFTEST TOOK TOO LONG. 

MOV #5000. ,R2 

oe of Be sCALCULATE @ OF MS SELFTEST TO COMPLETE. 
BLT 6$ sSELFTEST SKIPPED? YES, GO REPORT ERROR. 

CMP R2, #500. 

BLT 8$ ;GO REP ERR IF SELFTEST COMPLETED IN < 1/2 SEC. 


+ SELF-TEST COMPLETED WITHIN 1SEC TO S SECONDS. 
; CHECK THE STATE OF THE DIAGNOSTIC FAIL BIT, REPORT ERROR IF IT IS SET. 


ie BIT  oBIT13,(R4) ;DETERMINE IF THE DIAG FAIL BIT IS CLEAR. 
BEQ 5 ;SKIP ERROR REPORT IF BIT IS CLEAR 
rREPORT DIAGNOSTIC F FAIL BIT BAD. 


ERRNBR ;SET ERROR NUMBER TO IN ERROR TABLE. 
MOV 9€M1205, R1 ;SELECT THE ERROR MESSAGE. 
ERROR : >>>>> ERROR 61204 <<<<< 


TRAP 
3* 
; EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 


CSERROR 


SEG 151 


SARDURRE He's #! 


032767 
001440 


012767 
004767 
000432 


012767 
012701 


104460 
000423 
012767 
012701 
194460 
000414 
012767 
012701 


104460 
000405 


012767 
004767 
012700 
104441 
005067 


104401 


000100 


002265 
171050 


002261 
011321 


002262 
011463 


002265 
011405 


002272 


171740 


000340 
151542 


151574 © 


153330 


153314 


153276 


153260 


153242 


; "VERIFY THAT THE SELF-TEST CODES IN THE FIFO ARE “GOOD” 


J1le 
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sEXIT WITH TEST FAILURE MESSAGE IF 
sNO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 
; DURING THE SOFTWARE QUESTIONS. 


CODES ,IE THE DUT 


BIT 


©BITO6,OPTIGN 
SEQ 60$ 


; SUCCESSFULLY COMPLETED THE SELF-TEST 
. THIS SUBROUTINE REPORTS ERRORS WITH NUMBERS >>>>> 1205 THRU 1209 <<<<<, 


2: 


MOV #1205. oe se ERROR NUMBER TO 1205. 
JSR oe RSTR CHECK SELF-TEST CODES IN THE FIFO. 
BR sEXIT TEST 


3 * 
; ERROR REPORTS: 


4a$: 


6$: 


505: 


sREPORT SELF-TEST TOOK TOO LONG TO COMPLETE. 
MOV #1201. ,ERRNBR ;SET THE ERROR NUMBER IN THE ERROR TABLE. 
MOV €M1202,R1 sSELECT ERROR MESSAGE. 
ERROR ;REPORT ERROR. »>>>> ERROR #1201 <<<<< 
TRAP CSERROR 


BR 60$ sEXIT THE TEST. 


sREPORT SELF-TEST DID NOT EXECUTE AFTER DUT RESET. 
MOV #1202. ,ERRNBR ;SET THE ERROR NUMBER IN ERROR TABLE. 


MOV 9EM1204 ,R1 ;SELECT ERROR MESSAGE. 
ERROR sREPORT ERROR. >>>>> ERROR $1202 <<<<< 
TRAP CSERROR 
aR 60$ sEXIT THE TEST. 
sREPORT SELF-TEST COMPETED TOO SOON. 
MOV #1 RRNBR ;SET THE ERROR NUMBER IN THE ERROR TABLE. 
MOV 9€M1203, Ri SELECT ERROR MESSAGE. 
ERROR sREPORT ERROR. >>>>> ERROR $1203 <<<<< 
TRAP CSERROR 
BR 60$ sEXIT THE TEST. 
MOV #1210. ,ERRNBR ;SET THE ERROR NUMBER FOR TSABRT RIN. 
JSR PC, TSABRT sREPORT NON-TEST RELATED ERROR. 
SETPRI @PRIO7T ;DISABLE ALL INTERRUPTS. 
SPRIO7,.RO 
TRAP CS$SPRI 
cabrsy CTRLCF ; INDICATE THAT WE COMPLETED THE TEST. 


L10041;: 
TRAP CSETST 


SEQ 152 


RARDUARE Test" 


030716 


030720 


012767 


012701 
012702 
00500 


012777 
012704 
004767 
012777 


005267 


F TST PART 
ill : SELF TS 


011610 
000040 


151404 
167322 


167242 
146314 


153074 
011610 
000040 


151330 
167246 


153044 


K1e 
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151370 


151370 


-SBTTL HARDWARE TEST - STFAIL - 
S++ PHOEEEEAEEEEERERSEEEEREEEAREEAEDEEAREEERARAEAEEEAEAAREREREDERAAEAERAEEE EERE ES 


3% - SELF-TEST FAIL TEST - 


;4 THIS TEST i he THAT THE DUT WILL REPORT SELFTEST ERRORS VIA THE 

3% FIFO. AND THAT THE DIAGNOSTIC FAIL BIT WILL INDICATE THE ERROR. 

;* THIS IS ACCOMPLISHED VIA A SOFTWARE ‘HOOK’ IN THE SELF-TEST, WHICH 

34 FORCES A “PROC1 TO RAM ERROR” TO BE PLACED IN THE FIFO. 

;* 

s-- SEASEEEAEEEADEESEEAAEEEAEEEEREAEEEEEEAEAEEEAEEEEAEEEEEAEARAEEEEEEEEEREEREERES 
TST 


T13:: 
SETPRI #PRIOS ;ALLOW LTC INTERRUPTS. 
i 9 #PRIOS.RO 
TRAP CSSPRI 
s INCREMENT THE ASSEMBLY TIME TEST COUNTER. 
;SET UP THE TEST NUMBER ¢ 


13) 
sINDICATE THAT WE ARE WITHIN A TEST. 


MOV #1,ERRTYP ;SET ERROR TYPE AS FATAL IN ERROR TABLE. 
MOV #EM13501,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 
MOV @EROSOS.ERRBLK ;SET ERROR ROUTINE ADDRESS IN ERROR TABLE. 
MOV #1301. ,ERRNBR ;SET ERROR NUMBER TO 1301. 


3+ 
; WAIT UP TO S SECONDS FOR THE DUT MASTER sina BIT TO CLEAR. 
; IF TIME-OUT OCCURS, THEN EXIT THIS TEST 


MOV #5000. ,.R1 ;TIME-OUT VALUE IS 5.0 SECONDS. 

MOV #BITOS,Re2 sWAITING FOR MASTER RESET BIT. 

CLR RS sWAITING FOR BIT TO CLEAR. 

MOV CSRA,R4 sBIT IS IN THE DUT‘S CSR. 

JSR PC ,MSLGET sWAIT FOR DUT_CSR_MR BIT TO CLEAR. 
BCC 50$ ;GO REPORT ERROR IF MR DID NOT CLEAR. 


+ 


5 
; RESET THE DUT, DELAY FOR 25 MILLI- —— BEFORE WRITING THE FAIL_SELF_TEST 


; CODE TO TBUFFCT REGISTER ON CH 


MOV #BITOS,8CSRA ;SET DUT MASTER RESET BIT, SELECT em. 0. 
MOV @25. ,R4 att DELAY PERIOD OF 25 MILLI SECS 

JSR PC, DELAY WAIT FOR SELFTEST TO INITIALISE. 

MOV 0146314, STXBFCA SWRITE THE FAIL SELF-TEST CODE TO TBUFFCT REG. 


3 * 
; WAIT UP TO S SECONDS FOR THE SELF-TEST TO COMPLETE. 


IF TIME-OUT OCCURS, THEN EXIT THIS TEST. 


INC ERRNBR ;SET ERROR NUMBER TO 1302. 

MOV #5000. ,R1 sTIME-OUT VALUE IS 5.0 SECONDS. 

MOV SBI TOS ,R2 sPASS THE BIT MAP OF THE BIT TO TEST. 
CLR R3 ;SET UP THE EXPECTED STATE. 

MOV CSRA,R4 ‘BIT IS IN THE DUT’S CSR. 
JSR ue sWAIT FOR DUT_CSR_MR BIT TO CLEAR. 
BCC ;GO REPORT ERROR IF MR DID NOT CLEAR. 


; "VERIFY THE DIAGNOSTIC FAIL BIT IS SET, T° eect THE ERROR. 
; REPORT ERROR IF DIAGNOSTIC FAIL BIT IS CLEAR 


INC 


ERRNBR 


;SET ERROR NUMBER TO 1303. 


SEG 


153 


CZ ZDHUBO DHU -11 
HARDWARE TES? 


5865 
5866 


030724 
030730 


888 031012 


90 031014 


031032 


FUNC TST 


032714 
001425 


012701 


104460 
000402 


004767 


012700 
104441 
005067 


104401 


PART 
- STFA 


020000 


153032 


000010 


151274 


007400 
170231 


152764 
011576 


171452 


000340 
151254 


jie 
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s;CHECK THE STATE OF THE DIAG FAIL BIT. 
;GO REPORT ERROR IF DIAG_FAIL BIT CLEAR. 


SELF-TEST CODES FORM THE FIFO, AND VERIFY THAT AT LEAST 


BIT 
BEQ 


; REMOVE THE 8 


oBIT13,(R4) 
10$ 


; ONE IS A PROC1 TO RAM ERROR CODE (231). 
i 
INC ERRNBR ;SET ERROR NUMBER TO 1304. 
MOV #8. ,RO sSET MAXIMUM READ COUNT 
CLR 1 sCLEAR THE CORRECT CODE COUNTER. 
MOV RBUFA,R4 ;GET ADDRESS OF THE RECEIVER BUFFER REGISTER. 
6$: MOV (R4),R2 sREAD A CODE FROM THE FIFO. 
BPL 50$ 3GO REPORT ERROR IF THE FIFO IS EMPTY. 
BIC #7400 ,Re2 sREMOVE THE LINE NUMBER 4. THE CODE. 
CMPB = R2,4%170231 :IS IT THE CORRECT ERROR COD 
BNE 8$ ;SKIP NEXT oo Al IF NOT A 231 CODE. 
INC R1 s INCREMENT COUNTE 
8$: DEC RO sDECREMENT MAX READ COUNTER 
BNE 6$ ;LOOP IF 8 CODES HAVE NOT BEEN READ. 
TST R1 sWERE ANY 231 CODES FOUND? 
BNE 60$ sYES, THEN EXIT 
INC E » SET ERROR NUMBER TO 1305 AND REPORT ERROR. 


RRNBR 3NO 
sREPORT SELF-TEST ERROR REPORTING BAD. 


10$: MOV #EM1302,R1 ;SELECT ERROR MESSAGE. 
ERROR ;sREPORT ERROR. >>>>> ERROR «<<<< 
TRAP CSERROR 
BR 60$ sEXIT THE TEST. 
50$: JSR PC, TSABRI sREPORT NON-RELATED TEST ERROR. 
60$: SETPRI oP 2I07 ;OISABLE ALL INTERRUPTS. 
MOV #PRIO7,RO 
TRAP CS$SPRI 
CLR CTRLCF ; INDICATE THAT WE COMPLETED THE TEST. 
ENDTST 
L1004e: 
TRAP CsETST 


SEQ 154 


Mie 


F TST PART MACRO M -MAR - 9:15 PA . SS, 
CZRHUBO Diy 41 UNC TS A CRO M1200 15 84 09:1 GE 113 EQ 1 
58 
5897 
5898 .SBTTL HARDWARE TEST - ROMVER - 
5899 t+ CPPREEREREREREESEEAEEEERELEREEERELEREREREDEEEEEEAERERDADEREEEADAEEDEEE ERODE 
5900 ;4 ROM VERSION TEST - 
5901 56 THIS TEST VERIFIES THAT THE DUT’S SELF-TEST PLACES VALID ROM VERSION 
5902 3:4 NUMBERS IN THE FIFO AFTER IT HAS BEEN SKIPPED. THE ROM VERSION NUMBERS 
5903 4 WILL BE REPORTED (ON THE FIRST PASS ONLY), IF AN AFFIRMATIVE ANSWER 
3908 ;* WAS GIVEN TO THE SOFTWARE P-TABLE QUESTION. 
;* 
5906 t-- SEPEEEEEASEREEESEEREEERAAEEEEEAREEASEEALARLERERARAAAEAEREEDAREREREREREEDREDESE 
5907 031034 GNTST 
031034 T14:: 
5908 031034 SETPRI #PRIOS ;ALLOW LTC INTERRUPTS. 
031034 0612700 000240 a @PRIOS RO 
031040 104441 COSPRI 
5909 0000 TNUM == TNUM + s INCREMENT THE ASSEMBLY TIME Test. COUNTER 
5910 031042 012767 000016 151254 MOV @TNUM, TSTNUM ;SET UP THE TEST ER (14) 
5911 031050 012767 177777 151230 MOV @-1,CTRLCF sINDICATE THAT WE ARE WITHIN A TEST. 
$912 031056 012767 000001 152702 MOV @1,ERRTYP ;SET ERROR TYPE AS FATAL IN ERROR TABLE. 
5913 031064 012767 011635 152700 MOV EM1401,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 
444 031072 012767 016136 152674 MOV @EROSOS,ERRBLK ;SET ERROR ROUTINE ADDRESS IN ERROR TABLE. 
3* 
5916 ; WAIT UP TO 3 SECONDS FOR THE DUT MASTER RESET BIT TO CLEAR. 
+H ; IF TIME-OUT OCCURS, THEN EXIT THIS TEST 
R= 
5919 031100 012701 005670 MOV #3000. ,R1 ;TIME-OUT VALUE IS 3.0 SECONDS. 
5920 031104 012702 000040 MOV @BITOS,R2 sWAITING FOR MASTER RESET BIT. 
5921 031110 005003 CLR R3 sWAITING FOR BIT TO CLEAR. 
5922 031112 016704 151124 MOV CSRA,R4 ;BIT IS IN THE DUT’S CSR. 
5923 031116 004767 167042 JSR PC ,MSLGET ;WAIT FOR DUT_CSR_MR BIT TO CLEAR. 
see 031122 103131 BCC 50$ sABORT THE TEST IF MR DID NOT CLEAR. 
3* 
sane ; SET THE MASTER RESET BIT, AND SKIP THE SELF TEST. 
37 
5928 031124 010214 MOV R2,(R4) ;SET THE MASTER RESET BIT. 
5929 031126 004767 171212 JSR PC,.SKPSTS ; SKIP THE SELF TEST 
5930 031132 012701 011610 MOV #5000. .R1 ;TIME-OUT VALUE IS 5.0 SECONDS. 
5931 031136 767 167022 JSR PC .MSLGET sWAIT FOR DUT_CSR_MR BIT TO CLEAR. 
H+) 031142 103121 Bcc 50$ sABORT THE TEST IF MR DID NOT CLEAR. 
3* 
5934 ; REMOVE CORAL TERS FROM THE FIFO UNTIL EITHER; 
5935 ; CA) THE FIFO GO REPORT THE ERROR. 
5936 ; (B) THE maxon TRY COUNTER IS ZERO, GO REPORT THE ERROR. 
5937 ; (C) PROC_1'S ROM VERSION NUMBER WAS FOUND BEFORE PROC_2'S, GO REPORT ERROR. 
goss ; (0) BOTH ROM VERSION NUMBERS HAVE BEEN FOUND. 
3 = 
5940 031144 012705 000040 MOV #32. .R5 - 3SET MAXIMUM TRY COUNTER. 
5941 031150 012703 000143 MOV 999. ,R3 ;SET AN INVALID ROM VERSION NUMBER FOR PROC _1 
5942 031154 010304 MOV R3,R4 ;SET AN INVALID ROM VERSION NUMBER FOR PROC _2 
5943 031156 012767 002571 152604 MOV #1401.,.ERRNBR ;SET THE ERROR NUMBER TO 1401. 
oes 031164 012701 011674 MOV 9E€M1402,R1 ;SELECT MESSAGE TO BE REPORTED IF FIFO EMPTY. 
5946 031170 017702 151050 2s: MOV ARBUF A ,R2 ;READ THE NEXT CHAR FROM THE FIFO. 
zest 031174 100077 BPL 12$ :GO REPORT ERROR IF FIFO EMPTY. 
3 * 
5949 ; CHECK IF THE READ DATA IS A BMP CODE. 
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5950 3- 
5951 031176 012700 000301 MOV #301,RO ;SET-UP A BIT MASK OF A BMP CODE. 
5952 031202 040200 BIC R2,RO ;TRY TO CLEAR THE BIT MASK WITH THE READ DATA. 
5953 031204 001003 BNE 4$ ;BRANCH IF NOT A BMP CODE. 
5954 031206 004767 171064 JSR PC, SAVBMP ;SAVE THE BMP CODE ON THE QUEUE. 
4 031212 000435 BR 8$ ; 
ae? ; CHECK IF THE READ DATA IS A SELF-TEST CODE. 
3 = 
5959 031214 012700 000201 4$: MOV #201,RO ;SET-UP A BIT MASK OF A SELFTEST CODE. 
5960 031220 040200 BIC R2,RO ;TRY TO CLEAR THE BIT MASK WITH THE READ DATA. 
5961 031222 001431 BEQ 8$ ;BRANCH IF IT IS A SELFTEST CODE. 
3303 
;* 
pees ; THE READ DATA IS A ROM VERSION NUMBER, DETERMINE WHICH ONE IT IS. 
5966 031224 032702 000002 BIT #BIT1,R2 sCHECK THE PROCESSOR NUMBER BIT IN THE CODE. 
5967 031230 001407 BEQ 6$ s;BRANCH IF IT IS PROC_1 ROM VERSION NUMBER. 
5968 031232 010204 MOV R2,R4 ;SAVE PROC_2 ROM VERSION NUMBER. 
5969 0312 042704 177603 BIC #177603,R4 ;CLEAR ANY UNWANTED BITS. 
5970 031240 000241 CLC ;CLEAR THE CARRY BIT. 
5971 031242 ROR R4 ;SHIFT THE CODES ALONG TO GET THE ROM 
5972 031244 006004 ROR R4 ; VERSION NUMBER IN THE LOW 5 BITS. 
5973 031246 000417 BR 8$ ; 
5974 031250 010203 6$: MOV R2,R3 ;SAVE PROC_1 ROM VERSION NUMBER. 
5975 031252 042703 177603 BIC #177603,R3 ;CLEAR ANY UNWANTED BITS. 
5976 031256 000241 CLC ;CLEAR THE CARRY BIT. 
5977 031260 006003 ROR R3 ;SHIFT THE CODE ALONG TO GET THE ROM 
5978 031262 ROR R3 ; VERSION NUMBER IN THE LOW S BITS. 
5979 031264 020427 000143 CMP R4,999. ;CHECK IF WE HAVE RECEIVE PROC_2 ROM CODE. 
seee 031270 001016 BNE 10$ ;GO REPORT BOTH ROM VERSION NUMBERS. 
3* 
5982 ; RECEIVED ROM VERSION NUMBERS OUT OF SEQUENCE. 
zene ; PROC_1'S ROM VERSION NUMBER FOUND IN THE FIFO BEFORE PROC_2’S. 
+ — 
5985 031272 012701 011762 MOV 0€M1403,R1 ;SELECT THE ERROR MESSAGE TO BE REPORTED. 
5986 031276 012767 002572 152464 MOV #1402. ,E ;SET THE ERROR NUMBER. 
Zeer 031304 000433 §R 12$ ;GO REPORT ERROR. 
5989 031 005305 8$: DEC R5 ;DECREMENT THE MAX TRY CCUNTER. 
5990 031310 001327 BNE 2s ;LOOP TO GET THE NEXT CHAR FROM THE FIFO. 
5991 031312 012701 012035 MOV 9EM1404,R1 ;SELECT THE ERROR MESSAGE TO BE REPORTED. 
5992 031316 012767 002573 152444 MOV #1403.,ERRNBR ;SET THE ERROR NUMBER. 
4444 031324 000423 BR 12$ ;GIVE UP, GO REPORT ERROR. 
3° 
5995 ; IF THIS IS THE FIRST PASS, AND SOFTWARE P-TABLE QUESTION WAS ANSWERED YES. 
aeat ; THEN REPORT THE ROM VERSION NUMBERS TO THE OPERATOR. 
3 - 
5998 031326 032767 000001 150670 i103: BIT #BITO,OPTION sCHECK ON THE STATE OF THE SOFTWARE SWITCH. 
5999 031334 001431 BEQ 60 EXIT IF NO ROM VERSION PRINTOUT WAS REQUESTED 
6000 031336 026727 150750 000001 PASCNT, #1 sCHECK IF THIS IS THE FIRST PASS. 
6001 031344 003025 BGT 60$ s;EXIT IF ROM VERS HAVE ALREADY BEEN REPORTED. 
6002 031346 PRINTB #€F1401,R3,R4  ;PRINT THE ROM VERSION NUMBERS. 
031346 010446 MOV R4,-(SP) 
031350 010346 MOV R3,-(SP) 
031352 012746 004154 MOV #€F 1401, -( SP) 
031356 012746 000003 MOV #3, -(SP) 
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0313562 010600 MOV SP RO 
031364 1046414 TRAP CsPNTe 
031366 062706 000010 ADD #10,SP 
— 031372 00vU412 BR 60% sEXIT THIS TEST. 
5° 
6005 3 ERROR REPORTS: 
6006 Be 
6097 031374 012767 016254 152372 12%: - MOV ER1401,ERRBLK ;,SELECT THE ERROR REPORTING ROUTINE. 
6008 051402 ERROR sREPORT ERROR. >>>>> ERROR <c«ccc 
031402 104460 TRAP CsERROR 
pong 031404 000405 BR 60% 
6011 031406 012767 0602575 152354 503: MOV 61405. ,ERRNBR 3SET UP ERROR NUMBER FOR TSABRT RTN. 
ty 031414 004767 171052 JSR PC, TSABRT sREPORT NON-TEST RELATED ERROR. 
6( 14 031420 608: SETPRI OPRIO7 sOISABLE ALL INTERRUPTS. 
031420 012700 000340 MOV oPRIO7,RO 
031424 104441 TRAP CsSPRI 
6915 031426 005067 150654 CLR CTRULCF sINDICATE THAT WE COMPLETED THE TEST. 
£016 031432 ENDTST 
031432 L10043; 


031432 104401 TRAP Csersr 
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6018 .SBTTL HARDWARE TEST - CSRB4 - 
6019 5 OPPOSES EEEESSEODESESESESOESESERSEEOESEEEEDEAEEDEAEEAEEEHEDEEEEEEREDREADDEADEESS 
6020 3¢ - CSR BIT 4 TEST - 
6021 30 THIS TEST VERIFIES THAT WHEN THIS BIT IS SET (AT THE SAME TIME 
6022 50 AS MASTER RESET) THE DUT REMAINS INACTIVE WITH THE MASTER RESET 
6023 36 BIT SET; AND WHEN CSR BIT 4 IS SUBSEQUENTLY CLEARED, THE ROARD 
6024 36 BECOMES ACTIVE AND REPORTS SIX SKIP-SELFTEST CODES IN THE RXFIFO. 
6025 36 ANY BMP CODES FOUND IN THE FIFO ARE SAVED TO BE REPORTED LATER. 

s 
“oo ;O- - Seen dha hedsimendsennbbnnradtbnnnsessbedessesosoooscsczoocoacooseneonces 
6028 
6029 031434 BGNTST 

031434 T15:: 
6030 031434 SETPRI o#PRIOS sALLOW LTC INTERRUPTS. 
031434 012700 000240 MOV OPRIOS RO 

_ 031440 104441 TRAP CSSPRI 
603¢ 000017 TNUM == TNUM «+ 1 s INCREMENT THE ASSMBLY TIME TEST COUNTER. 
6033 031442 012767 000017 150654 MOV @TNUM, TSTNUM sSET UP THE TEST NUMBER. 
6034 031450 012767 177777 150630 MOV @-1,CTRLCF sINDICATE THAT WE ARE WITHIN A TEST. 
6035 031456 012767 000001 152302 MOV @1,ERRTYP sSET ERROR TYPE AS FATAL IN ERROR TABLE. 
6036 031464 012767 002735 152276 MOV #1501.,ERRNBR ;SET THE ERROR NUMBER TO 1501. 
6037 031472 012767 012155 152272 MOV EM1501,.ERRMSG ;SET THE ERROR MESSAGE ADDR. 
6038 031500 012767 016136 152266 MOV ®ERCSOS.ERRBLK ;SET THE ERROR REPORTING ROUTINE. 
6040 3° 
6041 ; WAIT FOR THE MASTER RESET BIT TO CLEAR. REPORT THE ERROR IF IT FAILS 
coat ; TO CLEAR. 

| ie 
6044 031 012701 011610 MOV ° sSET THE TIME-OUT VALUE OF S SEC. 
6045 031512 012702 000040 MOV @BITOS,R2 sINDICATE TO TEST BIT S. 
6046 031516 CLR 3 sINDICATE TO TEST FOR BIT CLEAR. 
6047 031520 016704 150516 MOV CSRA,R4 sINDICATE TO TEST THE CSR REG. 
6048 031524 004767 166550 JSR ‘ sWAIT FOR THE BIT TO CLEAR 
coe 031530 103115 BCC $ sJUMP TO REPORT ERROR IF BIT FAILED TO CLEAR. 
6951 3° 
6052 ; SET THE MASTER RESET AND CSR BIT 4 BITS, AND THEN WAIT 5.5 SECS TO ENSURE 
6035 ; THAT THE MR BIT DOESN'T CLEAR. 

| Be 
6055 031532 005267 152232 INC ERRNBR sSET THE ERROR NUMBER TO 1502. 
6036 031536 012777 000060 150476 MOV 060, 8CSRA sRESET THE BOARD WITH BIT 4 SET. 

3° 

cane ;VERIFY THAT CSR BIT 4 IS SET. 
6060 031544 017700 150472 MOV aCSRA,RO sREAD THE CSR. 
6061 031550 032700 000020 BIT @BIT04,RO sTEST BIT 4, 
6062 031554 001477 BEQ 40% sEXIT WITH ERROR IF THE BIT IS CLEAR. 
6064 ge 
6065 s;WAIT S SECONDS FOR THE MR BIT TO CLEAR. 
6066 
6067 031556 7 152206 INC ERENBR ;SET THE ERROR NUMBER TO 1503. 
6068 031562 012701 012574 MOV #5500. .R1 sSET THE TIME-OUT VALUE OF 5.5 SECS. 
6069 031566 004767 166506 JSR PC MSL sWAIT FOR THE MASTER RESET BIT TO CLEAR. 
6070 021572 103470 BCS 40% sREPORT THE ERROR IF THE MR BIT CLEARED. 


RARBURRRE FPS +! 


80 031610 


031614 
031620 
031624 


031626 


031644 
031652 


031656 


031720 


031722 
031726 


031736 
031744 


031746 
031750 


012767 
012701 


012704 


012767 
017702 


020327 
001407 


005267 
104460 


032767 
001411 


005 304 
001544 


017126 
015241 


000006 
002742 
150350 


177400 
000301 


170356 


000203 


152034 


000100 


152122 


152100 


150260 
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; CLEAR CSR BIT 4 AND VERIFY THAT THE MASTER RESET BIT ALSO CLEARS. 
3 - 


MOV @CSRA,RS sREAD THE CSR. 
BIC OBITO4 RS ;sCLEAR BIT 4 
MOV RS, 9CSRA sRESTORE THE “CONTENTS OF THE CSR. 
3? 
sVERIFY THAT CSR BIT 4 CLEARED. 
INC ERRNBR sSET THE ERROR NUMBER TO 1504. 
MOV @CSRA,RS sREAD THE CSR. 
BIT SBITO4 RS sTEST BIT 4. 
BNE 40$ ;BRANCH AND REPORT ERROR IF SET. 
sWAIT FOR THE MR BIT TO CLEAR. 
a « 
INC ERRNBR 3SET ge ERROR NUMBER TO 1505. 
MOV #500. ,.R1 sSET A TIME-OUT OF 1/72 SECS. 
JSR PC ,MSLOOP sWAIT FOR THE MR BIT TO CLEAR. 
BCC 40$ RROR, 


s JUMP AND REPORT E 
; MR BIT FAILED TO CLEAR. 
; "READ SIX CHARACTERS FROM THE RXFIFO AND VERIFY THEY ARE SKIP-SELFTEST 


; CODES. SAVE ANY BMP CODES FOUND TO BE REPORTED LATER. 
MOV ®ER9008 ,ERRBLK ;SET UP THE ERROR ROUTINE. 
MOV GEM9024 ,R1 sSET THE ERROR MESSAGE, 
: “IMPROPER SELFTEST CODE FOUND” 
MOV 06. ,R4 sSET THE NUMBER OF CHAR’S TO READ. 
2s: MOV 91506.,ERRNBR ;SET THE ERROR NUMBER TO 1506. 
MOV SRBUF A ,R2 sREAD A CODE FROM THE RXFIFO. 
BPL 50% sEXIT WITH ERROR IF THE FIFO IS EMPTY. 
MOV R2,R3 sCOPY THE CODE. 
BIC @177400,R3 sCLEAR THE LINE NUMBER AND ERROR FLAGS. 
MOV 0301,R5 sSET THE BMP CODE MASK. 
BIC R3,R5 s CHECK IF THE CODE IS A BMP CODE. 
BNE 46 sAVOID SAVING THE BMP CODE IF IT ISN'T 
JSR PC. SAVBMP sSAVE THE BMP C 
BR 2s sAVOID COUNTING THIS CODE, AND BRANCH 
sTO READ MORE DATA FROM THE RXFIFO. 
4$: CMP R3,#203 sIS THE CODE A SKIP-SELFTEST ? 
BEQ 6$ ;BRANCH TO AVOID THE ERROR IF IT IS. 


3 
; REPORT UNEXPECTED SELFTEST CODE FOUND. 


g¢ 
INC ERRNBR ;SET THE oon NUMBER TO 1507. 
ERROR sREPORT THE ERROR. 
TRAP CSERROR 
VIF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED THEN EXIT 
;THE TEST WITH THE TEST FAILURE MESSAGE. 


had 
BIT OBITO6,OPTION  ;HAS EXTENDED ERROR ge BEEN REQUESTED ? 
BEQ 60% sEXIT THE TEST IF IT HASN'T 


DEC R4 sDECREMENT THE CODE COUNT. 


6$: 
BNE 2s sBRANCH AND READ ANOTHER CODE IF NOT ALL 


sn a 


©6128 
6129 031752 
30 


6136 

6137 031754 

6138 

©139 031760 
031760 

6140 031762 

6141 

6142 

6143 

6144 031764 

6145 

6146 031770 

6147 

6148 031774 


031774 
031774 


000406 


012701 


104460 
000402 


004767 
005067 


104401 
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012203 


170502 
150312 


sHAVE BEEN READ. 
BR 60$ sOTHERWISE, EXIT THE TEST, THE DUT HAS PASSED 
;THIS TEST. 


3° 
; REPORT THE ERROR “CSR BIT 4 BAD” AND EXIT THIS TEST. 
$- 


40%: MOV 9€M1502,R1 ;SET UP THE EXTENDED ERROR MESSAGE AS, 
; "CSR BIT 4 BAD”. 
ERROR sREPORT THE ERROR. 
TRAP CSERROR 
BR 60$ sEXIT THE TEST. 
3 * 
3; REPORT A NON-RELATED TEST ERROR. 
i. 
50$: JSR PC, TSABRT sREPORT THE ERROR. 
60%: CLR CTRLCF sINDICATE THAT WE ARE NOT WITHIN A TEST. 
ENOTST 


L10044; 
TRAP CSsETST 


SEQ 160 


031776 
031776 


032062 
032066 
032070 


032140 
032146 


032150 
032152 


032767 
001433 


005302 
002356 


167270 
000142 


151670 
000017 
150132 


177760 


016416 151642 


000100 150056 
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-SBTTL HARDWARE TEST - REGWRW - 


3+ SESSSOEEESEESESES EEE SEEEEESESEERESESEESAEADEEEAEEEREOEEEEEEEEDEREREDEEDDAESS 
34 - DEVICE REGISTER WORD ACCESS READ AND WRITE TEST - 

3% 

;* THIS TEST VERIFIES THAT THE pos REGISTERS CAN BE READ AND WRITTEN 

;# CORRECTLY USING WORD ACCESSES 

be 

“en SPESESEESEDEEEEEEEEESSELASASEREAEEEDEEAEERADERAEDEREEAEEEDADEAEAEALEDEADEELS 


BGNTST -_ 
16:: 
SETPRI #PRIOS sALLOW THE LTC TO INTERRUPT. 
7 #PRIOS RO 
TRAP CSSPRI 
s INCREMENT THE ASSEMBLY TIME TEST COUNTER. 
;SET UP THE TEST NUMBER (16) 
: INDICATE THAT WE ARE WITHIN fs TEST. 


MOV #1,ERRTYP sSET UP DEVICE FATAL INDICATOR IN ERROR TYPE. 
MOV #1601. ,ERRNBR ;SET UP ERROR NUMBER IN THE ERROR TABLE. 

MOV #EM1604,ERRMSG ;SET UP ERROR MESSAGE FOR TEST IN ERROR TABLE. 
CLR ER sCLEAR THE ERROR SUMMARY FLAGS. 

MOV ®ERCNTB RO 

JSR ae sCLEAR THE ERROR COUNTER TABLE. 

CLR EXOERR sCLEAR THE "EXIT ON ERROR” FLAG 


; RESET THE DUT TO A KNOWN STATE, DO NOT REMOVE THE STATUS CODES FROM THE FIFO. 
; CLEAR TX AND RX INTERRUPT ENABLE BITS IN THE CSR. 

; THIS SUBROUTINE REPORTS ERRORS »>>>> 1601 <<<<<, 

3:7 


JSR PC ,RESETT sRESET THE DHU-11, REPORT ANY ERRORS FOUND. 
BCS - +6 sFATAL RESET ERROR? ™ CONTINUE WITH TEST. 
JMP 60$ sYES, EXIT THE TEST 
3° 
; VERIFY READ/WRITE CAPABILITY TO INDIREC ADDRESS FIELD OF CSR 
INC ERRNBR sSET THE ERROR REPORT NUMBER TO 1602. 
MOV #17,Re 3SET LOOP COUNT. 
MOV CSRA ,R4 sGET CSR ADDRESS. 
2s; MOV R2,(R4) sWRITE COUNT TO CSR. 
MOV (R4),R1 sREAD BACK THE CONTENTS OF THE CSR 
BIC #177760,R1 sMASK OUT ALL BUT THE IND.ADR.REG FIELD. 
CMP R1,R2 3 CHECK CT DATA WRITTEN/READ. 


FOR CORRE 
3IS EXPECTED DATA BAD? 


BEQ as NO, SKIP ERROR REPORT. 
ieee "BAD BITCS) IN DEVICE CSR REGISTER FOR LINE 0 (D).’ 


®ER1601,ERRBLK ;SELECT THE PROPER ERROR REPORT ROUTINE. 
CLR 3 sSET OFFSET TO 0 TO CAUSE REPORT OF CSR REG. 
CLR oR ;CAUSE REPORT OF LINE 0. 
ERROR ; >>>>> ERROR @ 1602 <<«<< 


TRAP 
; EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN REQUESTED. 


CSERROR 


BIT #BITO6,OPTION  ;HAS EXTENDED ERROR BEEN _- 2 
BEQ 60$ sEXIT THE TEST IF IT HASN'T 
43; DEC Re sDECREMENT LOOP COUNT/IND.ADD.REG ADDRESS 
BGE 2s ;LOOP BACK TO TEST NEXT ADDRESS IF NOT DONE . 


SFQ 161 


CZ0HUBO 
HARDWARE 


“Test 


032154 
052160 
032162 
032166 


032172 
032176 


032200 
032206 
032210 
032212 


032216 
032222 


032224 
032232 
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012767 
004767 
005067 


104401 
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151610 


000002 
166704 


150106 


003106 


166660 


150062 


003111 


167072 
150044 
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151562 


151536 


t* 
; WRITE AND VERIFY 16 DATA PATTERNS IN ALL USED BITS OF ALL REGISTERS ON ALL 
; ACTIVE LINES. BEFORE WRITING EACH PATTERN, CLEAR ALL THE BITS. 


; REGTST ROUTINE REPORTS ERRORS WITH NUMBERS »>>>>> ERROR 1603 - 1605 CeCe, 
ie 


INC ERRNBR ;SET THE ERROR NUMBER TO 1603. 

CLR R3 sINDICATE THAT WORD ACCESSES ARE TO BE USED. 
MOV 92,R4 sINDICATE R/wW ACCESS, CLEAR FIRST. 
JSR PC,REGTST sWRITE AND VERIFY DATA PATTERNS. 


3 
; EXIT THE TEST IF AN ERROR HAS BEEN FOUND AND EXTENDED ERROR REPORTING HAS 
; NOT BEEN REQUESTED, I.E. EXOERR IS NON-ZERO. 


R= 
TST EXOERR 3IS THE “EXIT ON ERROR” FLAG SET ? 
BNE 60$ sEXIT IF IT IS. 


3 * 
; WRITE AND VERIFY 16 DATA PATTERNS IN ALL USED BITS OF ALL REGISTERS ON ALL 
: ACTIVE LINES. BEFORE WRITING EACH PATTERN, SET ALL THE BITS. 

; REGTST ROUTINE REPORTS ERRORS WITH NUMBERS 


MOV #1606. ,ERRNBR ;SET UP ERROR NUMBER FOR REGTST ROUTINE. 

CLR R3 sINDICATE THAT WORD ACCESSES ARE TO BE USED. 
NEG R4 sINDICATE R/W ACCESS, SET FIRST. 

JSR PC,REGTST sWRITE AND VERIFY DATA PATTERNS. 


Sid 
; EXIT THE TEST IF AN ERROR HAS BEEN FOUND AND EXTENDED ERROR REPORTING HAS 


EXOERR IS NON-ZERO. 


sIS THE “EXIT ON ERROR” FLAG SET ? 
sEXIT IF IT IS. 


; NOT BEEN REQUESTED, I.E. 
TST EXOERR 
BNE 60$ 
3 * 
; PRINT ERROR SUMMARY REPORTS IF NECESSARY. 
8 THE FOLLOWING ROUTINE REPORTS ERRORS WITH NUMBER >>>>> ERROR @ 1609 <<<<< 


MOV #1609. ,ERRNBR sSET UP ERROR NUMBER FOR NEXT RIN. 
JSR PC ,REPSMR sREPORT ERROR SUMMARY IF NECESSARY. 
60$: Be CTRUCF sINDICATE THAT WE COMPLETED THE TEST. 


L10045: 


TRAP CSETST 


>>>>> ERROR 1606 - 1608 <<<<<, 


SEG 162 


CZ0HUS 


MARDWARE TEST 


032244 


032324 


032330 
032334 
032336 


032362 
032366 


012767 
005003 
012704 
004767 


005767 
001017 
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167022 
000064 


003247 


000001 
166514 


147716 
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151462 


151420 


-SBTTL HARDWARE TEST - REGWRM - 


s+ SPSSESEAESEBESSESESESESESELEEESEESEAEEEEFAEEREDEAEAAEEDEREREREEERAEEEREDEDES 


;* - DEVICE REGISTER WORD ACCESS READ/MODIFY/WRITE TEST - 


;* 

;* THIS TEST VERIFIES THAT THE DEVICE REGISTERS CAN BE WRITTEN CORRECTLY 

3# USING WORD READ/MODIFY/WRITE ACCESSES. 

3? 

g-- SESESEESEESESEEESESEEAESESESAEEERESEADESEEAREFEASEEEEAREEDEAERALADASEEDAEALDS 


BGNTST 
T17:: 
SETPRI #PRIOS sALLOW THE LTC TO INTERRUPT. 
MOV #PRIOS,RO 
TRAP C$SPRI 
; INCREMENT THE ASSEMBLY TIME TEST COUNTER. 
;SET UP THE TEST NUMBER. (17) 
s INDICATE THAT WE ARE WITHIN A TEST. 
;SET UP DEVICE FATAL INDICATOR IN ERROR TYPE. 


MOV #1701. ,ERRNBR ;SET UP ERROR NUMBER IN THE ERROR TABLE. 

MOV #EM1701,ERRMSG ;SET UP ERROR MESSAGE FOR TEST IN ERROR TABLE. 
CLR ERSMRF sCLEAR THE ERROR SUMMARY FLAGS. 

MOV #ERCNTB ,RO 

JSR PC .CLR16W sCLEAR THE ERROR COUNTER TASLE. 

CLR EXOERR sCLEAR THE “EXIT ON ERROR” FLAG 


3 * 
; RESET THE DUT TO A KNOWN STATE, DO NOT REMOVE THE STATUS CODES FROM THE FIFO. 
; CLEAR TX AND RX INTERRUPT ENABLE BITS IN THE CSR. 

; THIS SUBROUTINE REPORTS ERRORS >>>>> 1701 <«<<<, 

ad 


JSR PC ,RESETT sRESET THE DHU-11, REPORT ANY ERRORS FOUND. 
BCS +6 sFATAL RESET ERROR? NO, CONTINUE WITH TEST. 
JMP 60$ sYES, EXIT THE TEST. 


3 * 
; THE READ/MODIFY/WRITE CAPABILITY TO INDIRECT ADDRESS FIELD OF CSR IS 
; NOT TESTED THIS THIS FORM OF ACCESS IS ILLEGAL. 


3? 

; WRITE AND VERIFY 16 DATA PATTERNS IN ALL USED BITS OF ALL REGISTERS ON ALL 

3 ACTIVE LINES USING R/M/W. BEFORE WRITING EACH PATTERN, CLEAR ALL THE BITS. 
; REGTST ROUTINE REPORTS ERRORS WITH NUMBERS »>>>>> ERROR 1703 - 1705 <«<<<. 


MOV 01703.,ERRNBR ;SET THE ERROR NUMBER TO 1703. 

CLR R3 s INDICATE THAT WORD ACCESSES ARE TO BE USED. 
MOV #1,R4 s INDICATE R/M/W ACCESS, CLEAR FIRST. 

JSR PC ,REGTST sWRITE AND VERIFY DATA PATTERNS. 


; EXIT THE TEST IF AN ERROR HAS BEEN FOUND AND EXTENDED ERROR REPORTING HAS 
; NOT BEEN REQUESTED, I.E. EXOERR IS NON-ZERO. 


5.° 
TST EXOERR 3IS THE “EXIT ON ERROR” FLAG SET ? 
BNE 60% sEXIT IF IT IS, 


3? 

; WRITE AND VERIFY 16 DATA PATTERNS IN ALL USED BITS OF ALL REGISTERS ON ALL 

: ACTIVE LINES USING R/M/W. BEFORE WRITING EACH PATTERN, SET ALL THE BITS. 

; REGTST ROUTINE REPORTS ERRORS WITH NUMBERS >>>>> ERROR 1706 - 1708 <«<<<, 


SEQ 163 


CZDHUBO DHU - 
HARDWARE TEST 


11 


022402 


032406 
032412 


032414 


032432 
032432 


012767 
005003 
005404 
004767 


005767 
001005 


012767 
004767 
005067 


104401 


003252 


166470 


147672 


003255 
166702 
147654 


151372 


151346 


Lia 
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- REGWRM - 


MOV #1706. ,ERRNBR ;SET UP ERROR NUMBER FOR REGTST ROUTINE. 

CLR R3 s INDICATE THAT WORD ACCESSES ARE TO BE USED. 
NEG R4 s INDICATE R/M/wW ACCESS, SET FIRST. 

JSR PC ,REGTST sWRITE AND VERIFY DATA PATTERNS. 


3;* 
; EXIT THE TEST IF AN ERROR HAS BEEN FOUND AND EXTENDED ERROR REPORTING HAS 
; NOT BEEN REQUESTED, I.E. EXOERR IS NON-ZERO. 


5 = 
TST EXOERR ;IS THE "EXIT ON ERROR” FLAG SET ? 
BNE 60$ sEXIT IF IT IS. 


3* 
; PRINT ERROR SUMMARY REPORTS IF NECESSARY. 
i THE FOLLOWING ROUTINE REPORTS ERRORS WITH NUMBER >>>>> ERROR @ 1709 <<<<< 


MOV #1709. ,ERRNBR ;SET UP ERROR NUMBER FOR NEXT RIN. 
JSR PC ,REPSMR sREPORT ERROR SUMMARY IF NECESSARY. 
60$: eater CTRLCF sINDICATE THAT WE COMPLETED THE TEST. 


L10046: 


TRAP CSETST 


SEQ 164 


CZDHUBO OHU-11 FUNC TST PART 1 
HARDWARE TEST REGBRW 


032440 
032442 


2504 
36 032510 


032514 


032520 


004767 
103402 
000167 
012767 


012702 


012767 
005003 
005005 
104460 


032767 
001456 


151272 


151230 


000017 
147472 


177760 


016416 151202 


000100 147416 
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Ji 5 


SEG 165 


-SBTTL HARDWARE TEST - REGBRW - 

3+ SESEEEEEEEESESESEBERERERAESEEEEESAESEERAEAEEERAEAREDEDREEREREAADEAAEEEEDDE ESS 
;* - DEVICE REGISTER BYTE ACCESS READ AND WRITE TEST - 

3* 

;* THiS TEST VERIFIES THAT THE la REGISTERS CAN BE READ AND WRITTEN 
;4 CORRECTLY USING BYTE ACCESSES 


;* 


5 -- SERPREEEEEEEDREEEARAEEEESESEREEAEEAEEAEEADEERAEEEEEEREDEAEEEEEAEADEAAEADEDS 
BGNTST ' 
18:: 
SETPRI #PRIOS ;sALLOW THE LTC TO INTERRUPT. 
44 #PRIOS ,RO 
RAP CS$SPRI 
TNUM == TNUM + 1 s INCREMENT THE ASSEMBLY TIME TEST COUNTER. 
MOV &TNUM, TSTNUM :SET UP THE TEST NUMBER (18) 
MOV #-1,CTRLCF ; INDICATE THAT WE ARE WITHIN A TEST. 
MOV $1,ERRTYP ;SET UP DEVICE FATAL INDICATOR IN tame TYPE. 
MOV #1801. ,ERRNBR ;SET UP ERROR NUMBER IN THE ERROR 
MOV #EM1801,ERRMSG ;SET UP ERROR MESSAGE FOR ies. IN ERROR TABLE. 
CLR ERSMRF ;CLEAR THE ERROR SUMMARY FLAG 
MOV @ERCNTB,RO 
JSR PC ,CLRi6W ;CLEAR THE ERROR COUNTER TABLE. 
CLR EXOERR ;CLEAR THE “EXIT ON ERROR” FLAG. 


; RESET THE DUT TO A KNOWN STATE, DO NOT REMOVE THE STATUS CODES FROM THE FIFO. 
:; CLEAR TX AND RX INTERRUPT ENABLE BITS IN THE CSR. 

; THIS SUBROUTINE REPORTS ERRORS »>>>> 1801 <<<c<. 

g= 


JSR PC ,RESETT sRESET THE DHU-11, REPORT ANY ERRORS FOUND. 

BCS . +6 sFATAL RESET ERROR? NO, CONTINUE WITH TEST. 
60$ , sYES, EXIT THE TEST 

MOV #1602. ,ERRNBR sSET THE ERROR REPORT NUMBER TO 1802. 


3° 

; VERIFY READ/WRITE CAPABILITY TO INDIRECT ADDRESS FIELD OF CSR. 
; USE BYTE ACCESSES. 

3; 


MOV #17,Re :SET LOOP COUNT. 
MOV CSRA,R4 ;GET CSR ADDRESS. 
2s: MOVB R2,(R4) sWRITE COUNT TO CSR. 
MOVB (R4),R1 sREAD BACK THE CONTENTS OF THE CSR 
BIC $177760,R1 sMASK OUT ALL BUT THE IND.ADR.REG FIELD. 
CMP + ing ee en CORRECT DATA WRITTEN/READ. 


FOR 
BEQ S EXPECTED DATA BAD? “ SKIP ERROR REPORT. 
sREPORT “BAD BITCS) IN DEVICE TesR REGISTER aon LINE O (D).” 


#ERi601,ERRGLK ;SELECT THE R ERROR REPORT ROUTINE. 
CLR R3 sSET OFFSET TO O TO CAUSE REPORT OF CSR REG. 
CLR RS ;CAUSE REPORT OF LINE O. 
ERROR 3; »>>>>> ERROR @ 1802 <<<<< 


TRAP 
3? 
; EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 
BIT + alleen sEXIT WITH TEST FAILURE MESSAGE IF 


BEQ 3NO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 
sDURING THE SOFTWARE QUESTIONS. 


CSERROR 


CZOHUBO 


DHU-11 


HAROWARE TEST 


032610 
032612 


032614 
032630 
032634 
032640 
032642 
032650 
032652 


032656 
032662 


032676 


032702 
032706 


032710 


FUNC TST 


905302 
002356 


005267 
012703 
012704 
004767 


005767 
001041 


012767 


012767 


PARTI 
- REGBRW 


151150 
177777 
000002 


166242 


147444 


003416 
166220 


147422 


003421 


166174 


147376 


003424 151052 


K1S 
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151120 


151076 


4$: DEC R2 sDECREMENT LOOP COUNT/IND.ADD.REG ADDRESS. 
BGE 2s ;LOOP BACK TO TEST NEXT ADDRESS IF NOT DONE. 


3 * 

; WRITE AND VERIFY 16 DATA PATTERNS IN ALL USED BITS OF ALL LOWER BYTES OF ALL 
; REGISTERS ON ALL ACTIVE LINES. USE READ/WRITE ACCESSES. BEFORE WRITING 

; EACH PATTERN, CLEAR ALL THE USED BITS OF ALL ACTIVE REGISTERS. 

; REGTST ROUTINE REPORTS ERRORS WITH NUMBERS >>>>> ERROR 1603 - 1805 CeeK, 
ig 


INC ERRNBR ;SET THE ERROR NUMBER TO 1803. 

MOV #-1,R3 ; INDICATE THAT LO BYTE ACCESSES ARE TO BE USED. 
MOV #2,R4 ; INDICATE R/W ACCESS, CLEAR FIRST. 

JSR PC,REGTST ;sWRITE AND VERIFY DATA PATTERNS. 


3 * 
; EXIT THE TEST IF AN ERROR HAS BEEN FOUND AND EXTENDED ERROR REPORTING HAS 
; NOT BEEN REQUESTED, I.E. EXOERR IS NON-ZERO. 


: TST  EXOERR :IS THE “EXIT ON ERROR” FLAG SET ? 
BNE 60$ ;EXIT IF IT Is. 


; 
; - BEFORE WRITING 
3 «© EACH PATTERN, CLEAR ALL THE USED BITS OF ALL ACTIVE REGISTERS. 
; REGTST ROUTINE REPORTS ERRORS WITH NUMBERS 


MOV #1806. ,ERRNBR ;SET UP ERROR NUMBER FOR REGTST ROUTINE. 
NEG R3 ;INDICATE THAT HI BYTE ACCESSES ARE TO BE USED. 
JSR PC ,REGTST sWRITE AND VERIFY DATA PATTERNS. 


;¢ 
; EXIT THE TEST IF AN ERROR HAS BEEN FOUND AND EXTENDED ERROR REPORTING HAS 
; NOT BEEN REQUESTED, I.E. EXOERR IS NON-ZERO. 


g- 
TST EXOERR sIS THE “EXIT ON ERROR” FLAG SET ? 
BNE 60% sEXIT IF IT IS. 


; 
; WRITE AND VERIFY 16 DATA PATTERNS IN ALL USED BITS OF ALL LOWER BYTES OF ALL 
; REGISTERS ON ALL ACTIVE LINES. USE READ/WRITE ACCESSES. BEFORE WRITING 

; EACH PATTERN, SET ALL THE USED BITS OF ALL ACTIVE REGISTERS. 

i REGTST ROUTINE REPORTS ERRORS WITH NUMBERS 

e 


MOV #1809..,ERRNSR ;SET UP ERROR NUMBER FOR REGTST ROUTINE. 

NEG R3 s INDICATE THAT LO BYTE ACCESSES ARE TO BE USED. 
NEG R4 sINDICATE R/W ACCESS, SET FIRST. 

JSR PC ,REGTST sWRITE AND VERIFY DATA PATTERNS. 


:¢ 
; EXIT THE TEST IF AN ERROR HAS BEEN FOUND AND EXTENDED ERROR REPORTING HAS 
; NOT BEEN REQUESTED, I.E. EXOERR IS NON-ZERO. 

é 


: TST  EXOERR :IS THE “EXIT ON ERROR” FLAG SET ? 
BNE 603 sEXIT IF IT Is. 


: 

: . 

; EACH PATTERN, SET ALL THE USED BITS OF ALL ACTIVE REGISTERS. 
; 


sSET UP ERROR NUMBER FOR REGTST ROUTINE. 


MOV #1812. ,ERRNBR 


>>>>> ERROR 1806 - 1808 <<<<<., 


>>>>> ERROR 1809 - 1811 «<<<<, 


SEG 166 


6427 032716 
6428 032720 


2 
6433 032724 
6434 032730 


6438 

6439 032732 
6440 032740 
6441 032744 
6442 032750 


SERRE! FUNC 151 


005403 
004767 


005767 
001005 


012767 


004767 


005067 


104401 


ha keaad 
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"RECBRW 


166152 


147354 


151030 


NEG R3 
JSR PC,REGTST sWRITE AND VERIFY DATA PATTERNS. 
3+ 


; EXIT THE TEST IF AN ERROR HAS BEEN FOUND AND EXTENDED ERROR REPORTING HAS 
; NOT BEEN REQUESTED, I.E. EXOERR IS NON-ZERO. 


TST EXOERR ;IS THE “EXIT ON ERROR” FLAG SET ? 
BNE 60$ sEXIT IF IT IS. 


3° 
; PRINT ERROR SUMMARY REPORTS IF NECESSARY. 
; THE FOLLOWING ROUTINE REPORTS ERRORS WITH NUMBER >>>>> ERROR @ 1815 <<<<< 


MOV #1815. ,ERRNBR ;SET UP ERROR NUMBER FOR NEXT RIN. 
JSR PC ,REPSMR sREPORT ERROR SUMMARY IF NECESSARY. 
60$: oukiet CTRLCF s INDICATE THAT WE COMPLETED THE TEST. 


10047: 


TRAP CSETST 


s; INDICATE THAT HI BYTE ACCESSES ARE TO BE USED. 


SEQ 167 


CZ0HUBO 
HARDWARE TES 


DHU-11 


032752 


033050 


94 033076 


033102 


012767 


005267 
012703 
012704 
004767 


005767 
001041 


FUNC TST PARTI 
- RE 


147246 


166314 


000136 
003557 


147202 


M13 
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-SBTTL HARDWARE TEST - REGBRM - 


3+¢ SEREEELEAERESESEBESFEAEAEEEREEAEEREEEEAEAAEREAAREARAAEAEEEEE EERE EERE EES © 
:* - DEVICE REGISTER BYTE ACCESS READ/MODIFY/WRITE TEST - 

3* 
;* THIS TEST VERIFIES THAT THE DEVICE REGISTERS CAN BE READ AND WRITTEN 
3# CORRECTLY USING BYTE ACCESSES IN READ/MODIFY/WRITE MODE. 


;* 


5 -- S&ARSSSERREEEEAAESASAEEEEEERRERERAAREAEARAREEERAAEEAAEREREAAEE EERE REEDS 
BGNTST ~ 
SETPRI #PRIOS sALLOW THE LTC TO INTERRUPT. | 
MOV #PRIOS,RO 
TRAP C$SPRI 
TNUM == TNUM + s INCREMENT THE ASSEMBLY TIME TEST COUNTER. 
MOV &TNUM, TSTNUM ;SET UP THE TEST NUMBER. (19) 
MOV #-1,CTRLCF sINDICATE THAT WE ARE WITHIN A TEST. 
MOV #1,ERRTYP sSET UP DEVICE FATAL INDICATOR IN ERROR TYPE. 
MOV #1901.,ERRNGR ;SET UP ERROR NUMBER IN THE ERROR TABLE. 
MOV 9EM1901,ERRMSG ;SET UP ERROR MESSAGE FOR TEST IN ERROR TABLE. 
CLR ERSMRF sCLEAR THE ERROR SUMMARY FLAGS. 
MOV @ERCNTB,RO 
JSR PC ,CLR1i6W sCLEAR THE ERROR COUNTER TAGLE. 
CLR EXOERR sCLEAR THE “EXIT ON ERROR” FLAG. 


3¢ 
; RESET THE DUT TO A KNOWN STATE, DO NOT REMOVE THE STATUS CODES FROM THE FIFO. 
; CLEAR TX AND RX INTERRUPT ENABLE BITS IN THE CSR. 

; THIS SUBROUTINE REPORTS ERRORS >>>>> 1901 <<<<<. 


JSR PC ,RESETT sRESET THE DHU-11, REPORT ANY ERRORS FOUND. 
BCS +6 sFATAL RESET ERROR? NO, CONTINUE WITH TEST. 
JMP 60$ ;YES. EXIT THE TEST. 

MOV #1903. ,ERRNBR ;SET THE ERROR REPORT NUMBER TO 1903. 


3+ 
; THE READ/MODIFY/WRITE CAPABILITY TO INDIRECT ADDRESS FIELD OF CSR IS NOT 
; TESTED SINCE THIS IS AN ILLEGAL FORM OF ACCESS TO THIS REGISTER. 


3¢ 
; WRITE AND VERIFY 16 DATA PATTERNS IN ALL USED BITS OF ALL LOWER BYTES OF ALL 
: REGISTERS ON ALL ACTIVE LINES. USE READ/MODIFY/WRITE ACCESSES. BEFORE 
WRITING EACH PATTERN, CLEAR ALL THE USED BITS OF ALL ACTIVE REGISTERS. 


: 
3 REGTST ROUTINE REPORTS ERRORS WITH NUMBERS »>>>> ERROR 1903 - 1905 <<<<<. 
ge 


INC ERRNBR sSET THE ERROR NUMBER TO 1903. 

MOV #-1,R3 sINDICATE THAT LO SYTE ACCESSES ARE TO BE USED. 
MOV #1,R4 sINDICATE R/M/W ACCESS, CLEAR FIRST. 

JSR PC ,REGTST ;sWRITE AND VERIFY DATA PATTERNS. 


; EXIT THE TEST IF AN ERROR HAS BEEN FOUND AND EXTENDED ERROR REPORTING HAS 
; NOT BEEN REQUESTED, I.E. EXOERR IS NON-ZERO. 


ae 
TST EXOERR ;IS THE “EXIT ON ERROR” FLAG SET ? 
BNE 60$ sEXIT IF IT IS. 


3 ¢ 
; WRITE AND VERIFY 16 DATA PATTERNS IN ALL USED BITS OF ALL HIGH BYTES OF ALL 


= 


m 


CZOHUBO DHU-11 
HARDWARE TEST 


033104 
033112 
033114 


033120 
033124 


033126 


033140 


033144 


033150 
7 


033152 


34 033160 


033162 


033166 
033172 


033174 
033202 
033206 
033212 
033212 
033212 


FUNC TST 


012767 
0054 


005767 
001016 


012767 
005403 
004767 
005767 


001005 


012767 


PART1 
- REGBRM 


003562 
165756 


147160 


003565 


165732 


147134 


003570 
165710 


147112 


147074 


Nis 
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150656 


150634 


150610 


150566 


; REGISTERS ON ALL ACTIVE LINES. USE READ/MODIFY/WRITE ACCESSES. BEFORE 
i WRITING EACH PATTERN, CLEAR ALL THE USED BITS OF ALL ACTIVE REGISTERS. 
; REGTST ROUTINE REPORTS ERRORS WITH NUMBERS >>>>> ERROR 1906 - 1908 C<KeC, 


MOV #1906. ,ERRNBR ;SET UP ERROR NUMBER FOR REGTST ROUTINE. 
NEG R3 s INDICATE THAT HI BYTE ACCESSES ARE TO BE USED. 
JSR PC,REGTST ;sWRITE AND VERIFY DATA PATTERNS. 


3+ 
; EXIT THE TEST IF AN ERROR HAS BEEN FOUND AND EXTENDED ERROR REPORTING HAS 
; NOT BEEN REQUESTED, I.E. EXOERR IS NON-ZERO. 


. TST  EXOERR :IS THE “EXIT ON ERROR” FLAG SET ? 
BNE 60$ ;EXIT IF IT Is. 


3; * 

; WRITE AND VERIFY 16 DATA PATTERNS IN ALL USED BITS OF ALL LOWER BYTES OF ALL 
; REGISTERS ON ALL ACTIVE LINES. USE READ/MODIFY/WRITE ACCESSES. BEFORE 

; WRITING EACH PATTERN, SET ALL THE USED BITS OF ALL ACTIVE REGISTERS. 
: REGTST ROUTINE REPORTS ERRORS WITH NUMBERS 
37 


MOV #1909. ,ERRNBR ;SET UP ERROR NUMBER FOR REGTST ROUTINE. 

NEG R3 s; INDICATE THAT LO BYTE ACCESSES ARE TO BE USED. 
NEG R4 s INDICATE R/M/w ACCESS, SET FIRST. 

JSR PC ,REGTST sWRITE AND VERIFY DATA PATTERNS. 


3 * 

; EXIT THE TEST IF AN ERROR HAS BEEN FOUND AND EXTENDED ERROR REPORTING HAS 
; NOT BEEN REQUESTED, I.E. EXOERR IS NON-ZERO. 

} 


TST EXOERR 3IS THE “EXIT ON ERROR” FLAG SET ? 
BNE 60$ sEXIT IF IT IS. 
3 * 
WRITE AND VERIFY 16 DATA PATTERNS IN ALL USED BITS OF ALL HIGH BYTES OF ALL 
REGISTERS ON ALL ACTIVE LINES. USE READ/MODIFY/WRITE ACCESSES. BEFORE 


THE USED BITS OF ALL ACTIVE REGISTERS. 


3 
; WRITING EACH PATTERN, SET ALL 
; REGTST ROUTINE REPORTS ERRORS WITH NUMBERS 


MOV #1912.,ERRNBR ;SET UP ERROR NUMBER FOR REGTST ROUTINE. 
NEG R sINDICATE THAT HI BYTE ACCESSES ARE TO BE USED. 
JSR PC .REGTST ;sWRITE AND VERIFY DATA PATTERNS. 


+ 
; EXIT THE TEST IF AN ERROR HAS BEEN FOUND AND EXTENDED ERROR REPORTING HAS 
; NOT BEEN REQUESTED, I.E. EXOERR IS NON-ZERO. 


= TST _EXOERR (gIS THE “EXIT ON ERROR” FLAG SET ? 
BNE 60$ EXIT IF IT IS. 


+ 
; PRINT ERROR SUMMARY REPORTS IF NECESSARY. 
; THE FOLLOWING ROUTINE REPORTS ERRORS WITH NUMBER >>>>> ERROR @ 1915 <«<<< 


MOV #1915.,ERRNBR ;SET UP ERROR NUMBER FOR NEXT RTN. 
JSR PC .REPSMR sREPORT ERROR SUMMARY IF NECESSARY. 
60$: elie: CTRLCF sINDICATE THAT WE COMPLETED THE TEST. 


L10050: 


TRAP CsETST 


>>>>> ERROR 1909 - 1911 <<ccc, 


>>>>> ERROR 1912 - 1914 <<<c<, 


SEO 169 


CZDHUBO 
HARDWARE 


6560 


OM -11 
TEST 


033326 


012767 
012767 


004767 
1035016 


017701 


FUNC TST PARTI 
- IOBIT 


000240 
000024 
177777 


000001 
003721 
012602 


166072 


146756 
000400 


003722 
012652 
0161356 


146760 


MACRO M1200 


147074 


150462 
150454 


B14 
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.SBTTL HARDWARE TEST - IOBIT - 


°° SP PSSSESSSSSOSSSSSEDSSESOESASSEEEESEEEEASASESEEDDEHEEEEDEEEOREDEEAEEEEEDEEES 


3¢ - DEVICE REGISTER ID BIT TEST - 
3* 
3° THIS TEST VERIFIES THAT THE DUT STAT REGISTER ID BIT READS AS SET. 
Ps 
we SEEDS SEOAESESESESESSOAEOEEEEEEESEODEEEEEEOEEEEEEEEEEEDEEEEEEEEEEDEEEEESEREES 
BGNTST 
T20:: 
SETPRI @PRIOS sALLOW THE LTC TO INTERRUPT. 
= oPRIOS RO 
RAP CSSPRI 
TNUM == TWUM «+ 1 s INCREMENT THE ASSEMBLY TIME TEST COUNTER. 
MOV @TNUM, TSTNUM sSET UP THE TEST NUMBER (20) 
MOV &-1,CTRLCF s INDICATE THAT WE ARE IN A TEST. 
MOV #1,ERRTYP sSET UP DEVICE FATAL INDICATOR IN ERROR TYPE. 
MOV #2001. ,ERRNBR ISET UP ERROR NUMBER IN THE ERROR T E. 


TABL 
sSET UP ERROR MESSAGE FOR TEST IN ERROR TABLE. 


; "RESET THE OUT TO A KNOWN STATE, DO NOT REMOVE THE STATUS CODES FROM THE FIFO. 
i aes TX AND RX INTERRUPT ENABLE BITS IN THE CSR. 

; THIS SUBROUTINE REPORTS ERRORS »>>>> 2001 <«c«<, 
3- 


JSR PC ,RESETT sRESET THE OMU-11, REPORT ANY ERRORS FOUND. 
BCC 60% sFATAL RESET ERROR? YES, EXIT THE TEST. 
i 
; READ THE STAT REGISTER ID BIT AND VERIFY THAT IT IS CLEAR. 
5: 
MOV SF SLSA,R1 sREAD THE STAT REGISTER CONTENTS. 
BIT @BITS,R1 sCHECK THE ID BIT 
BNE 60$ sI0 BIT SET? YES, EXIT THE TEST. 
MOV @2002..ERRNBR  =;NO, T THE ERROR REPORT NUMBER TO 2002. 
MOV ®EM2002 .R1 :GET THE PROPER ERROR MESSAGE. 
MOV SEROSOS,ERRBLK ;SELECT THE PROPER ERROR REPORT ROUTINE. 
ERROR sERROR NUMBER »>>>>> 2002 <<<<< 
TRAP CSERROR 
608: CLR CTRULCF s INDICATE THAT WE COMPLETED THE TEST. 
ENOTST 
L10051: 
TRAP CserTsT 


SEQ 1706 


GARBURR: OF +! 


0127 0 
104441 
000025 
012767 
012767 
012767 
012767 
012767 
012767 


004767 
103114 


000240 


000025 
177777 
000001 
004375 
012725 
017222 


164374 


60 
177777 
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.SBTTL HARDWARE TEST - TXENBI- 
EOF SEPESEESESODESESEESESEESESEESEDEEEEEEREEEEESEDEREEEOEEEEEREREDEEEEDOREESELE 
34 - TX_ENABLE CINACTIVE) TEST - 
34 THIS TEST VERIFIES THAT WHEN THE LINE UNDER TEST’S TX_ENABLE BIT IS 
34 CLEAR, TRANSMISSION WILL NOT TAKE PLACE ON THAT LINE. 
38 THIS TEST IS PERFORMED IN INTERNAL LOOPBACK, AND ON ALL ACTIVE LINES. 
. 
ean SPAOASAAEEESOEESESEEEEDEEESEEEEOEEEEDEOEEEDEREEEEEEOEEEEAODDEEREEEORESESEES 
BGNTST 
Tel:: 
SETPRI O@PRIOS sALLOW LTC INTERRUPTS. 


MOV oPRIOS ,RO 
TRAP C$SPRI 

s INCREMENT THE ASSEMBLY TIME TEST COUNTER. 
sSET UP THE TEST NUMBER (23) 


@-1,CTRLCF sINDICATE THAT WE ARE IN A TEST. 
MOV #1, ERRTYP sSET ERROR TYPE AS FATAL IN ERROR TABLE. 
MOV #2301. ,ERRNBR sSET THE FIRST ERROR NUMBER IN ERROR TABLE. 
MOV @EM2501,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERRTBL. 
MOV ®ER9101.ERRBLK ;SELECT THE CORRECT ERROR REPORTING ROUTINE. 


3¢ 
s RESET THE DUT TO A KNOWN STATE, REMOVE THE STATUS CODES FROM THE FIFO. 
; CLEAR TX AND RX INTERRUPT ENABLE BITS IN THE CSR. 

; THIS SUBROUTINE REPORTS ERROR >>>>> 2301 <<ccc, 

: 2 


JSR PC,CLNRST sRESET THE DHU-11, REPORT ANY ERRORS FOUND. 
BCC 60% sRESET FAILURE?, ABORT THIS TEST. 
+ 
; SET INTERNAL LOOPBACK ON ALL ACTIVE LINES. 
: Satie ante LINES TO 38.4K BAUD, & BITS PER CHARACTER, ODD PARITY, 
5 ° 
s ENABLE TRANSMITTERS ON ALL LINES. 
g- 
MOV ACTLNS.RS sPASS THE ACTIVE LINE BIT MAP. 
MOV #200 ,RO sPASS THE LNCTRL CONTENTS. 
JSR PC ,.WTWLNC sINITIALISE THE LNCTRL REGISTERS. 
MOV 9177670,R0 sPASS THE LPR CONTENTS. 
JSR PC .WIWLPR sINITIALSE THE LPR REGISTERS ON ALL LINES. 
MOV #10. ,R4 sPASS DELAY TIME OF 10 MILLI-SECONDS. 
JSR »OELAY sWAIT FOR LNCTR AND LPR REGS TO BE UPDATED. 
MOV NS .RS sPASS THE BIT MAP C SPONDING TO ALL LINES. 


sENABLE TRANSMITTERS ON ALL LINES. 


3° 
s TEST ALL ACTIVE LINES INDIVIDUALLY. 
; DISABLE TRANSMISSION ON EACH ACTIVE LINE. 


MOV #1,R35 sSET UP THE LINE BIT MAP FOR CHANNEL O. 
CLR R4 sCLEAR THE LINE NUMBER COUNTER. 
2s MOV #2302.,ERRNBR ;SET THE ERROR NUMBER TO 2302. 
BIT R3,ACTLNS sCHECK IF THE LINE IS ACTIVE. 
BEQ 6% sSKIP TESTING THIS LINE IF IT IS INACTIVE. 


CLEAR THE TX_ENABLE BIT IN TBUFFAD2 REGISTER. 
SELECT THE LINE UNDER TEST. 
VERIFY IT IS CLEAR, REPORT ERROR IF SET, 


SEG 171 


D14 
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RARBURRe OFS $2 FUNC TST 


PART ang {MACRO M1200 


9) 7 9) Vv R3,.R5 sPASS THE BIT MAP OF THE LINE UNDER TEST. 
e643 33968 663367 167100 Jee Be TXDSBL sDISABLE TRANSMISSION ON THE LINE UNDER TESTI. 
6642 033504 010477 146532 MOV R4,8CSRA sSELECT THE LINE CURRENTLY UNDER TEST. 

6644 033510 005777 146542 TST STXAD2A sVERIFY THE TX_ENABLE BIT IS SET. 
ren 033514 100433 BMI 4$ 3GO REPORT ERROR IF TX_ENABLE BIT SET. 
3*¢ 
6647 3; WRITE CATA BYTE CASCII <LF>) TO THE OuTPUT FIFO. 
0048 ; WAIT FOR A TX_ACTION TO BE RETURNED, REPOR] ERROR IF A TX_ACTION 
aan s IS FOUND BEFORE TIME-OUT OCCURS. 
6651 033516 012/67 004377 150244 MOV #2303. ,ERRNBR 3SET ERROR NUMBER TO 2303. 
6652 033524 112777 0oO00012 146516 MOVB 012,8FDATA sWRITE THE DATA BYTE TO THE DUT’S OUTPUT FIFO. 
6653 033532 012701 170003 MOV 170003 ,R1 sTEST BIT 15, TIMEOUT OF 3 MILLI SECS. 
6654 033536 016702 146500 MOV CSRA,R2 sPASS THE ADDRESS OF THE REGISTER TO TEST. 
6655 033542 004767 167522 JSR PC, ,WAIBIS sWAIT FOR TX_ACTION TO COME BACK. 
yay 033546 103416 BcS 4$ sGO REPORT ERROR IF A TX-ACTION FOUND. 
3 ¢ 
rete ; WAIT FOR THE DATA TO APPEAR IN THE FIFO, REPORT ERROR IF DATA F GUND. 
i 
033550 005267 150214 INC 3SET ERROR NUMBER TO 2304. 
6661 033554 012701 070012 MOV #70012.R1 sTEST BIT 7, TIMEOUT OF 10 MILLI SECS. 

033 016702 146456 MOV CSRA, sPASS THE ADDRESS OF THE REGISTER TO TEST. 
6663 033 004767 167500 JSR PC ,WAIBIS sWAIT FOR RX_DATA_AVAILABLE TO SET. 

033570 103405 BCS 4$ sREPORT ERROR IF DATA RECEIVED IN THE FIFO. 
6665 033572 005267 150172 INC E ;SET ERROR NUMBER TO 2305. 

033576 017702 146442 MOV Q@RBUFA.R2 sREAD THE DATA FROM THE FIFO. 
Sota 033602 100010 BPL 6$ ;SKIP ERROR REPORT IF DATA ISN'T THERE. 
6669 0335604 010401 4$: MOV R4,R1 sPASS THE NUMBER OF CURRENT LINE UNDER TEST. 
6670 033606 012702 012772 MOV EM2302 ,R2 ;PASS THE MESSAGE TO BE REPORTED. 
6671 ;"TX_ENABLE BIT BAD ON LINE: NN”. 
6672 032612 ERROR 3 >>>>> ERROR <<ccc, 
ars 033612 104460 TRAP CSERROR 
6674 033614 032767 000100 146402 BIT OB ITO6,OPTION sEXIT THE TEST, WITH THE TEST FAILED MESSAGE, 
6675 033622 001406 BEQ 60% sIF EXTENDED ERROR REPORTING HAS NOT BEEN 
6676 sREQUESTED. 
6677 
6678 36 
aan ; VERIFY ALL ACTIVE LINES HAVE BEEN TESTED. 

Eg 

6681 033624 000241 63: CLC ;CLEAR THE CARRY BIT PRIOR TO ROTATION. 
6682 033626 006103 ROL Rs ;SHIFT THE BIT MAP FOR THE NEXT LINE. 
6683 033630 005204 INC 4 ; INCREMENT THE LINE NUMBER COUNTER. 
6684 033632 020427 000020 CMP R4, ONUMLNS sHAVE ALL THE LINES BEEN TESTED?. 
6685 033636 002711 BLT sNO; BRANCH TO TEST THE NEXT LINE. 
6687 033640 005067 146442 60$: CLR CTRLCF s INDICATE THAT WE ARE NOT WITHIN A TEST. 
6688 033644 ENDTST 

033644 L1005e: 

033644 104401 TRAP CSETS? 


GARDURR OE St! 


033712 


033720 
033724 


033776 
034000 


e 
012767 


004767 
103133 


016705 


012703 
005004 
012767 
030 


367 
001467 


017222 


164056 


004542 
146216 


147762 


E14 
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. SBTTL TEST ~ TXENBA- 

FHF SESSESESEESESSEOSESSEESESEESEESESSEEEEEEEAEEDREADAEREEDEOREREEDEEREREEEEAEESS 
;* - TX_ENABLE CACTIVE) TEST - 

;* THIS TEST VERIFIES THAT WHEN THE TX_ENABLE BIT IS SET IN THE APPRORIATE 


34 LINE REGISTER, TRANSMISSION WILL TAKE PLACE ON THAT LINE. 
34 THIS TEST IS PERFORMED IN INTERNAL LOOPBACK, AND ON ALL ACTIVE LINES. 
3% 
$-- SPSESEESEEESEEESEEDESESEESEEOAEESESEDESELEAEDADEDOEDEEDEDEREREAEEEEREEDEDEDES 
BGNTST 
T22:: 


SETPRI #PRIOS sALLOW LTC INTERRUPTS. 
MOV ePRIOS,RO 
P CSSPRI 


TRA 
s INCREMENT THE > ioe TIME =e) ll 
° 24 


MOV @TNUM, TSTNUM sSET UP THE TEST NUMBE 

MOV @-1,CTRLCF sINDICATE THAT WE ARE IN A TEST. 

MOV #1,ERRTYP sSET ERROR TYPE AS FATAL IN ERROR TABLE. 

MOV 02401. ,ERRNBR sSET THE FIRST ERROR NUMBER IN ERROR TABLE. 
MOV ®EM2401,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERRTBL. 

MOV ER9101,ERRBLK ;SELECT THE CORRECT ERROR REPORTING ROUTINE. 


i* 

; RESET THE DUT TO A KNOWN STATE, REMOVE THE STATUS CODES FROM THE FIFO. 
; CLEAR TX AND RX INTERRUPT ENABLE BITS IN THE CSR. 

; THIS SUBROUTINE REPORTS ERROR >>>>> 2401 <<<c<, 


g- 
JSR PC,CLNRST sRESET THE DHU-11, REPORT ANY ERRORS FOUND. 
BCC 60$ sRESET FAILURE?, ABORT THIS TEST. 


SET INTERNAL LOOPBACK ON ALL ACTIVE LINES. 
SET LPR ON ALL LINES TO 38.4K BAUD, 8 BITS PER CHARACTER, ODD PARITY, 
DISABLE TRANSMITTERS ON ALL LINES. 


sPASS THE ACTIVE LINE BIT MAP. 


MOV #200 ,RO sPASS THE LNCTRL CONTENTS. 

JSR PC ,WTWLNC sINITIALISE THE LNCTRL REGISTERS. 

MOV #177670,RO sPASS TRE LPR CONTENTS. 

JSR PC ,WIWLPR sINITIALSE THE LPR REGISTERS ON ALL LINES. 
MOV #10. ,R4 sPASS DELAY TIME OF 10 MILLI-SECONDS. 

JSR PC DELAY sWAIT FOR LNCTR AND LPR REGS TO BE UPDATED. 
MOV »RS sPASS THE BIT MAP C ING TO ALL LINES. 


NS ORRE SPOND 
JSR PC, TXDSBL sDISABLE TRANSMITTERS ON ALL LINES. 


3¢ 
; TEST ALi ACTIVE LINES INDIVIDUALLY. 

; ENABLE TRANSMISSION ON EACM ACTIVE LINE. 
ie 


MOV @1,.R5 3SET UP THE LINE BIT MAP FOR CHANNEL O. 
CLR R4 sCLEAR THE LINE NUMBER COUNTER. 
2s: MOV 92402. ,ERRNBR ;SET THE ERROR NUMBER TO 2402. 
BIT R3,ACTLNS sCHECK IF THE LINE IS ACTIVE. 
BEQ 8$ sSKIP TESTING THIS LINE IF IT IS INACTIVE. 


3* 

; SELECT THE LINE UNDER TEST. 

; SET THE TX_ENABLE BIT IN TBUFFAD2 REGISTER. 
; VERIFY IT IS SET, REPORT ERROR IF CLEAR, 
2 


SEQ 17% 


F1i4 
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6744 034014 010305 MOV R3,R5 sPASS THE BIT MAP OF THE LINE UNDER TEST. 
6745 034016 004767 166656 JSR PC, TXENBL sENABLE TRANSMISSION ON THE LINE UNDER TEST. 
6746 034022 012705 000012 MOV #10. .R5 ;SET TXCHAR/LOOP COUNT TO i0. 
6747 034026 010477 146210 MOV R4,aCSRA sSELECT THE LINE CURRENTLY UNDER TEST. 
6748 034032 005777 146220 TST @TXAD2ZA sVERIFY THE TX_ENABLE BIT IS SET. 
os 034036 190045 BPL 6$ :GO REPORT ERROR IF TX_ENABLE BIT CLEAR. 

5* 
6751 ; WRITE DATA BYTE (ASCII <LF>) TO OUTPUT FIFO. 
6752 ; WAIT FOR A TX_ACTION TO BE RETURNED, REPORT ERROR IF NO TX_ACTION 
6735 ; FOUND BEFORE TIME-OUT OCCURS. 

‘ a 

6755 034040 012767 004543 147722 43: MOV #2403.,ERRNBR ;SET ERROR NUMBER TO 2403. 
6756 034046 112777 000012 146174 MOVB 12,8FDATA sWRITE THE DATA BYTE TO THE DUT’S OUTPUT FIFO. 
6757 034054 012701 170004 MOV #170004 ,R1 ;TEST BIT 15, TIMEOUT OF 4 MILLI SECS. 
6758 034060 016702 146156 MOV CSRA,R2 sPASS THE ADDRESS OF THE REGISTER TO TEST. 
6759 034064 004767 167200 JSR PC ,WAIBIS sWAIT FOR TX_ACTION TO COME BACK. 
6760 034070 103030 Bcc 6$ ;GO REPORT ERROR IF NO TX-ACTION FOUND. 

3 * 
676e ; WAIT FOR THE DATA TO APPEAR IN THE FIFO, REPORT ERROR IF TIME-OUT. 

5 = 
6764 034072 005267 147672 INC ERRNBR ;SET ERROR NUMBER TO 2404. 
6765 034076 012701 070012 MOV #70012,R1 ;TEST BIT 7, TIMEOUT OF 10 MILLI SESS. 
6766 034102 016702 146134 MOV CSRA,R2 sPASS THE ADDRESS OF THE REGISTER TO TEST. 
6767 034106 004767 167156 JSR PC ,WAIBIS ;WAIT FOR RX_DATA_AVAILABLE TO SET. 
6768 034112 103017 BCC 6$ sREPORT ERROR IF NO DATA RECEIVED IN THE FIFO. 
6769 034114 005267 147650 INC ERRNBR ;SET ERROR NUMBER TO 2405. 
6770 034120 017702 146120 MOV @RBUFA,R2 sREAD THE DATA FROM THE FIFO. 
6771 034124 100012 BPL 6$ :;GO REPORT ERROR IF THER IS‘NT ANY DATA THERE. 
6772 034126 005267 147636 INC ERRNBR ;SET ERROR NUMBER TO 2406. 
6773 034132 000302 SWAB RO sPUT THE LINE NUMBER IN THE LOW BYTE. 
6774 034134 042702 177760 BIC @177760,R2 :CLEAR THE UNWANTED BITS. 
6775 034140 020204 CMP R2,R4 ;DID THE DATA COME FROM THE CORRECT LINE?. 
6776 034142 001003 BNE 6$ 3NO; GO REPORT THE ERROR. 
6777 034144 005305 DEC R5 sDECREMENT THE TXCHAR/LOOP COUNTER. 
6778 034146 001334 BNE 4% sLOOP TO TX THE NEXT CHAR. 
et7 034150 000410 BR Rg 3GO TEST THE NEXT LINE. 
6781 034152 010401 6$: MOV R4,R1 sPASS THE NUMBER OF CURRENT LINE UNDER TEST. 
6782 034154 012702 012772 MOV @EM2302,R2 sPASS THE MESSAGE TO BE REPORTED. 
6783 ;“TX_ENABLE BIT BAD ON LINE: NN’. 
6784 034160 ERROR ; >>>>> ERROR <<ccc, 
astin 034160 104460 TRAP CSERROR 
6786 034162 032767 000100 146034 BIT OBITO6,OPTION ,;EXIT THE TEST IF EXTENDED ERROR REPORTING 
ore? 034170 001411 BEQ 60$ sHAS NOT BEEN ENABLED, SINCE THE TEST HAS FAILED. 
6789 se 
orae ; VERIFY ALL ACTIVE LINES HAVE BEEN TESTED. 

Zz < 

6792 034172 010305 8$: MOV R3,R5 sPASS THE BIT MAP OF THE LINE UNDER TEST. 
6793 034174 004767 166404 JSR PC, TXDSBL ;CLEAR THE TX_ENABLE BIT ON THIS LINE. 
6794 034200 000241 cLC sCLEAR THE CARRY BIT PRIOR TO ROTATION 
6795 934202 006103 ROL Rz ;SHIFT THE BIT MAP FOR THE NEXT LINE. 
6796 034204 00 INC R4 s INCREMENT THE LINE NUMBER COUNTER. 
6797 034206 020427 000020 CMP R4, ONUMLNS _ gHAVE ALL THE LINES BEEN TESTED?. 
6798 034212 002672 BLT 2s 3NO; BRANCH TO TEST THE NEXT LINE. 


SARDUARE Test: 


©6800 054214 
6801 034220 
034220 
034220 


FUNC TST PART MACRO M1200 15-MAR-84 09:15 PAGE 121-2 
Une TST Paenea” 


104401 


60$: 


CLR 
ENDTST 


CTRLCF 


Gi4 


s INDICATE THAT WE ARE NOT WITHIN A TEST. 


L10053: 


TRAP 


CsETST 


SEO 175 
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HARDWARE TES 


6803 


6848 


012767 


004767 
103402 
000167 
912767 


012705 
004767 


005067 
005067 


005067 
012767 
012746 


012746 
012746 


165064 


001044 
005055 


177777 
166362 


145772 
145770 
145774 
002726 


000300 
024036 
145656 
000003 


000010 


000300 
023660 
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146066 
146042 
147514 
147510 
147504 


147462 


145742 


ril 4 


-SBTTL HARDWARE TEST - INTA - 


3° SPSESSESESELESESESESESEAEESASSESEOEARADEEAEEEEEREREDAEREEEAREEEAEAEDEREDADES 


34 INTERRUPT TEST - 


“ee THIS TEST VERIFIES THAT THE DEVICE UNDER TEST (DUT) WILL GENERATE 

o RECEPTION AND TRANSMISSION INTERRUPTS CORRECTLY. THIS TEST DOES 

— NOT DEPEND ON THE USE OF THE SERIAL LINE TRANSMISSION OR RECEPTION 

~ CAPABILITIES OF THE DUT. THE LINES ARE PUT IN INTERNAL LOOPBACK 

a TO MINIMIZE ANY EXTERNAL EFFECTS THAT COULD BE CAUSED ON DEVICES 

+ ATTACHED TO THE SERIAL LINES. 

€ 

e SESEEREERSERERESEEEEEEEBEEEAAEEEREEEEEEEREAEEAEEEREREDEEEEEEEARAERAEEEED EDS 
BGNTST 


T23:: 

SETPRI #PRIOS :ALLOW THE LTC TO INTERRUPT. 
MOV OPRIOS,RO 
CS$SPRI 


TRAP 
s INCREMENT THE ASSEMBLY TIME TEST COUNTER. 
NUMBER (26) 


MOV @TNUM, TSTNUM ;SET UP THE TEST ° 

MOV @-1,CTRLCF sINDICATE THAT WE ARE IN A TEST. 

MOV #1,ERRTYP sSET ERROR FATAL ERROR TYPE IN ERROR TABLE. 
MOV #1601. ,ERRNBR ;SET FIRST ERROR REPORT NUMBER IN ERROR TABLE. 
MOV #EM2601..ERRMSG ;SET TEST ERROR MESSAGE IN ERROR TABLE. 


2° 
; RESET THE DUT TO A KNOWN STATE. DO NOT REMOVE THE STATUS CODES FROM THE FIFO. 
; CLEAR TX AND RX INTERRUPT ENABLE BITS IN THE CSR. 

; THIS SUBROUTINE REPORTS ERRORS FROM >>>>> 2601 THRU 2602 <<<<<. 


JSR PC ,RESETT sRESET THE DHU-11, REPORT ANY ERRORS FOUND. 
BCS 2s ;SKIP AROUND ABORTING TEST IF NO ERROR FOUND. 
JMP 60$ sABORT TEST IF FATAL ERROR FOUND DURING RESET. 
2s: MOV 62603. .ERRNBR sSET THE ERROR REPORT NUMBER TO 2603. 
3? 
; ENABLE TRANSMITTERS ON ALL LINES. 
a ° 
4$: MOV @MAPLNS RS sPASS ACTIVE LINE BIT MAP. 
JSR PC, TXENBL sENABLE TRANSMISSION ON ALL LINES. 


3* 

; TEST RECEPTION INTERRUPTS. 

3 SET UP FOR RX AND TX INTERRUPTS: 

; RX INTERRUPT SERVICE ROUTINE INPUTS A CHAR AND COUNTS THE INTERRUPT. 
; TX INTERRUPT SERVICE ROUTINE COUNTS TX INTERRUPTS. 

5 = 


CLR RXINTC ;CLEAR THE RX INTERRUPT COUNTER. 

CLR RXINTF sCLEAR THE RX INTERRUPT FLAGS. 

CLR TXINTC sCLEAR THE TX INTERRUPT COUNTER. 

MOV OBUFBAS.BUFPTR ;LOAD THE BUFFER PTR WITH THE BUFFER BASE ADR. 

SETVEC RXVECA,ORXINPT,@PRIO6 ;SET UP INTERRUPT VECTOR TO CATCH RX INT. 
MOV #PRIOG, -C SP) 
MOV ORXINPT, -CSP) 
MOV RXVECA, -( SP) 
MOV @3,-(SP) 
TRAP CsSveEc 
ADO #10, SP 

SETVEC TXVECA,@CACHTX,@PRIO6 ;SET UP INTERRUPT VECTOR TO CATCH TX INT. 
MOV #PRIO6, -( SP) 
MOV #CACHTX, -< SP) 


SEQ 176 


nAROW 


eat! re rst 


016746 
012746 
104437 
062706 


012700 
104441 


032777 


005767 


032767 
001002 
000167 


PART 
INTA 


145632 
000003 


000010 
000200 


165624 
000004 


163466 
165550 


145646 
013310 
000200 
013222 
100000 


013131 


145604 
013404 


000100 145466 


000556 


114 
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145560 


145546 


$ 
6$: 


3 * 


SETPRI #PRIO4 sALLOW DEVICE INTERRUPTS. 


3* 

sENABLE RECEPTION INTERRUPTS. 

sDELAY 4 MS TO ALLOW TIME FOR THE INTERRUPTS TO TAKE PLACE. 
sDISABLE RECEPTION INTERRUPTS. 

he 


JSR PC ,RXIE1 sENABLE THE RECEPTION INTERRUPTS. 

MOV 04 ,R4 sPASS 4 MS COUNT TO THE DELAY ROUTINE. 
JSR PC ,DELAY sDELAY 4 MILLI-SECONDS. 

JSR PC ,RXIEO sDISABLE RECEPTION INTERRUPTS. 


3¢ 
; VERIFY THAT THE CORRECT INTERRUPTS TOOK PLACE. 
: TEST THE INT COUNTER TO VERIFY THAT INTERRUPTS TOOK PLACE. 


C$SvEC 
#10,SP 


#PRIO04 ,RO 


C$SPRI 


TST RXINTC sCHECK THE RX INTERRUPT COUNT. 
NE 6$ sSKIP THE FOLLOWING ERRORS IF COUNT <> 0. 
3° 
; DETERMINE REASON FOR NO RX INTERRUPTS AND PRINT PROPER ERROR MESSAGE. 
| tae 
MOV @EM2604 ,R1 sSET UP MSG IN CASE “RX.DATA.AVAIL IS CLR”. 
BIT #BIT7,8CSRA sTEST THE RX.DATA.AVAIL BIT OF THE CSR. 
BEQ 8$ ;GO REPORT ERROR IF RX.DATA.AVAIL IS CLR. 
MOV 9EM2603,R1 sSET UP MSG IN CASE "DATA.VALIO IS CLEAR”. 
BIT @BIT1S,QRBUFA ;TEST THE DATA.VALIO BIT OF THE FIFO. 
BEQ 8$ 3GO REPORT ERROR IF DATA.VALID IS CLEAR. 
MOV GEM2602 ,R1 3SET UP MSG. ”“DATA.VALID IS SET”. 
BR 8$ :GO REPORT THE ERROR. 
3¢ 
; IF RX INTS OCCURRED WITH RX.DATA. AVAIL CLEAR, REPORT THE ERROR. 
TST RXINTF sCHECK THE RX INTERRUPT FLAGS. 
BPL 10$ ;SKIP THE ERROR IF FLAG IS CLEAR. 
MOV #EM2605 ,.R1 ;SET UP THE PROPER MESSAGE. 


3* 
; REPORT THE ERROR WHICH HAS BEEN FOUND. 
5-* 

ERROF 2603,EM2601,ERO5SO3; 


. WORD 
- WORD 
. WORD 


3? 
; EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 
 B 


a" en (ne Skee sEXIT WITH TEST FAILURE MESSAGE IF 


JMP 34 


>>>>> ERROR 82603 <<<cc<, 
TRAP 


a 
sNO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 


TXVECA, -( SP) 
P) 


CSEROF 
2605 


EM2601 
EROSOS 


SEQ 177 


J14 


CZDHUBO DHU-11 FUNC TST PARTI MACRO 41260 15-MAR-84 09:15 PAGE 122-2 SEQ 174 
HARDWARE TEST - INTA - 

6096 VERIFY THAT NO TX INTERRUPTS HAVE BEEN GENERATED SO FAR IN THIS TEST. 

6 

6898 034544 016702 145556 ios: MOV TXINTC,R2 sLOAD @ OF TX INTERRUPTS FOR EROSO4 RIN. 

6899 034550 001414 BEQ 12$ ;SKIP ERROR IF NO TX INTERRUPTS. 

6900 sREPORT “TX INTERRUPTS(S) RECEIVED WITH TX INTERRUPTS DISABLED. ” 

6901 034552 012701 007505 MOV 8EM0526,R1 s;SET UP MESSAGE ADR FOR INDIRECT PRINT. 

6902 034556 ERRDF 2604, EM2601 »EROS04; >>>>> ERROR 02604 <<ccc. 

034556 104455 TRAP  CSERDF 
034560 005054 -WORD 2604 
034562 013073 .WORD €EM2601 
034564 016174 -WORD EROSO4 
£393 
3; * 

6905 ; EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 

6907 

6908 034566 032767 000100 145430 BIT #BITO6,OPTION ;EXIT WITH TEST FAILURE MESSAGE IF 

6909 034574 001002 BNE . +6 ; 

4 034576 000167 000520 JMP 34$ ;NO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 

1 
6912 3° 
pee ; CLEAN OUT THE INTERRUPT VECTORS USED IN THIS TEST. 
g = 

6915 034602 12$: SETPRI #@PRIOG ;DISABLE DEVICE INTERRUPTS. 

034602 012700 000300 MOV #PRIO6 RO 
034606 104441 TRAP CSSPRI 

6916 034610 CLRVEC RXVECA sRETURN RX INT VECTOR TO UNUSED POOL. 

034610 016700 145416 MOV RXVECA,RO 
034614 104436 TRAP CSCVvEC 

6917 034616 CLRVEC TXVECA ;RETURN TX INT VECTOR TO UNUSED POOL. 

034616 016700 145412 MOV TXVECA,RO 

— 034622 104436 TRAP CSCVEC 

3* 

6919 ; TEST TRANSMISSION INTERRUPTS. 

6920 ; SET UP FOR RX AND TX INTERRUPTS: 

6921 5 RX INTERRUPT SERVICE ROUTINE COUNTS RX INTERRUPTS. 

one ; TX INTERRUPT SERVICE ROUTINE COUNTS THE INTERRUPT AND SETS FLAGS. 

6924 034624 005067 145464 CLR RXINTC ;CLEAR THE RX INTERRUPT COUNTER. 

6925 034630 005067 145472 CLR TXINTC ;CLEAR THE TX INTERRUPT COUNTER. 

6926 034634 005067 145470 CLR TXINTF ;CLEAR THE RX INTERRUPT FLAGS. 

6927 034640 SETVEC RXVECA, @CACHRX, ePRIO6 ;SET UP INTERRUPT VECTOR TO CATCH RX INT. 
034640 012746 000300 MOV @PRIO6G, -(SP) 
034644 012746 023632 MOV @CACHRX, -( SP) 
034650 016746 145356 MOV RXVECA, -( SP) 
034654 012746 000003 MOV 03,-(SP) 
034660 104437 TRAP C$SVEC 
034662 062706 000010 ADD #10,SP 

6928 034666 SETVEC TXVECA,@TXINTR,OPRIO6 ;SET UP INT VECTOR TO TX INT ROUTINE. 

034666 012746 000300 MOV @PRIO6, -( SP) 
034672 012746 024146 MOV @TXINTR, -<SP) 
034676 016746 145332 MOV TXVECA, -(SP) 
034702 012746 000003 MOV #3, -(SP) 
034706 104437 TRAP CSSVEC 
034710 062706 000010 ADD #10,SP 

6929 034714 SETPRI #PRIO4 sALLOW DEVICE INTERRUPTS. 

034714 012700 000200 MOV oPRIO4S ,RO 


SARDUaE Test! 


035076 


035100 
035106 


012701 
000402 
012701 


012701 
104455 
5056 


00 
013467 
016136 


032767 
001500 


K14 
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TRAP C$SPRI 


3° 
; VERIFY THAT THE TX_ACTION BIT IS CLEAR. 


000022 MOV #18.,R5 sINITIALIZE THE LOGP COUNTER. 
000144 MOV #100. ,R1i ;SET 100 MS TIME-OUT. 
100060 MOV #68IT15,R2 sSELECT TX_ACTION BIT TO TEST. 
145300 MOV CSRA,R4 sPASS DUT CSR AS THE WORD 70 TEST. 
100000 14%: MOV BIT15,R3 sWAIT FOR TX_ACTION TO BE SET. 
163326 JSR PC ,MSLOOP ;sWAIT UP TO 100 MS FOR TX_ACTION SET. 
BCC O$ ;IF TIME-OUT, CONSIDER Tx Th CLEAR. 
CLR ;NOW, WAIT FOR Tx ACTION CLE 
163316 JSR PC ,.MSLOOP ;WAIT UP TO 100 MS FOR TX ACTION CLEAR. 
BCC 16$ sIF TIME-OUT, REPORT TX_ACTION WON'T CLEAR. 
DEC che Hye THE TX _ACTION SET COUNTER. 
BNE LOOP IF NOT TOO MANY TX_ACTIONS FOUND. 
sREPORT “TX ACTION SET REPEATEDLY AFTER RESET, NO DATA SENT.” 
013526 MOV %€M2607,R1 ;SELECT ERROR MESSAGE. 
BR 18$ ;GO TO REPORT THE ERROR. 
013622 16$: MOV #EN2608 ,R1 ;SELECT TX_ACTION STUCK SET MSG. 
18%: ERRDF 2605, EM2606, EROSOS; >>>>>» ERROR #2605 <<<c<, 
TRAP CSERDF 
-WORD 2605 
-WORD EM2606 
-WORD EROSO3 
3; * 
; EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 
000100 145204 BIT @BITO6.OPTION  ;EXIT WITH TEST FAILURE MESSAGE IF 
BEQ 34$ sNO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 
166006 JSR - T ataeat sENABLE TX INTERRUPTS FOR THE TX_INT TESTING. 
BR 24s 3GO TO TEST WITH TX_ACTION SET 
"VERIFY THAT NO INTERRUPTS OCCUR WITH TX_ACTION CLEAR. 
166000 208: JSR PC, TXIE1 sENABLE TX_INTERRUPTS 
000062 MOV ~ R4 sPASS 50 MS TIME TO THE DELAY ROUTINE. 
163060 JSR PC ,DELAY sDELAY SO MILLI-SECONDS TO ALLOW INTS TO OCCUR. 
145256 TST TXINTC sTEST THE TX INTERRUPT COUNT. 
BEQ 24% ;SKIP THE ERROR IF NO TX INTERRUPTS. 
013526 MOV 9EM2607 ,R1 ;SELECT MESSAGE IN CASE TX INT FLAG CLEAR. 
145246 TST TXINTF ;TEST THE TX INTERRUPT FLAGS. 
BPL 22% Ao REPORT ERROR IF TX FLAG IS CLEAR. 
013673 MOV GEM2609 .R X FLAG a ne SELECT PROPER ERROR MESSAGE. 
sREPORT “TRANSMIT INTERRUPT test ERROR: 
22$: ERROF 2606,EM2606,EROSO3; >>>>> ERROR #2606 <<<<<, 
TRAP "CSERDF 
-WORD 2606 
-WORD EM2606 
.WORD EROSO3 
3* 
; EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 
000100 145116 BIT #BITO6,OPTION ;EXIT WITH TEST FAILURE MESSAGE IF 
BEQ 32$ sNO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 


SEG 179 
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HARDWARE TEST 


035110 
035114 


035120 


035140 


035144 
035150 
035152 


035174 


035176 
035202 


035206 
035212 


035214 


035246 
035246 
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016701 
005002 
010177 


112777 
005201 


766 


005777 


005767 
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145212 
145210 


177777 
000200 
166416 

30 


1564 
166436 


145140 
145064 
000000 


000020 


000372 
162716 


145114 


013752 
145016 


014044 


145070 | 


013673 
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3¢ 
; PREPARE. TX INTERRUPT COUNTER AND FLAGS. 
5 = 


CLR =: TXINTC ;CLEAR THE TX INTERRUPT COUNT. 
CLR = TXINTF CLEAR THE TX INTERRUPT FLAGS. 
3+ 
; SET UP LINE PARAMETERS FOR TRANSMISSION. 
MOV @MAPLNS, RS :PASS ACTIVE LINES BIT MAP. 
MOV #200, RO sPASS INERT STATE, INTERNAL LOOPBACK. 
JSR —s- PC, WTWLNC sDISABLE RECPTION AND DMA, ETC. ON DUT. 
MOV  #156430,RO :SPECIFY 9600BPS,1STOP,NO PARITY ,8BITS/CHAR. 
JSR —s- PC, WTWLPR ;WRITE TO ALL LPR REGISTERS. 
3;* 
; SEND A NULL CHAR TO EACH LINE. 
| ee 
Mov —«sIESTAT,R1 SET UP THE STATE OF THE INTERRUPT ENABLE BITS. 
CLR = Re sCLEAR THE LINE COUNTER. 
MOV R1,@CSRA ;SET UP THE LINE NUMBER AND INTERRUPT ENABLE 
:BITS IN THE CSR. 
MOVB 0,@FDATA ‘SEND A NULL CHARACTER TO THE OUTPUT FIFO. 
INC Ri sNEXT CSR CONTENTS 
INC R2 sNEXT LINE. 
CMP =—-R2, @NUMLNS :IF ALL LINES HAVE NOT BEEN SERVICED THEN 
BLT 25 ;BRANCH. : 
3 * 
; DELAY 250 MILLI-SECONDS TO ALLOW INTERRUPTS TO OCCUR. 
Tes 
MOV @250.,R4 SET UP FOR 250 MS DELAY. 
JSR —s PC, DELAY sWAIT 250 MS. 


3° 
; VERIFY THAT TX INTERRUPTS OCCURRED. 


5-= 
TST TXINTC sCHECK THE TX INTERRUPT COUNTER 
BNE 26% ;SKIP THE FOLLOWING ERROR IF WE GOT Tx INTS. 


3* 
; DETERMINE THE REASON THAT WE RECEIVED NO INTERRUPTS. 


MOV GEM2610,R1 sSET UP_MSG IN CASE “TX_ACTION IS SET”. 
TST @aCSRA sCHECK THE DUT CSR. 
8MI 28% ;GO TO REPORT ERROR IF TX_ACTION IS SET. 
MOV €M2611,R1 sSET UP “TX_ACTION NOT SET” MESSAGE. 
BR 28$ :GO AND REPORT THE ERROR. 
3* 
; CHECK TO VERIFY THAT TX_ACTION WAS SET FOR EACH INTERRUPT. 
TST TXINTF ;CHECK THE TX INTERRUPT FLAGS. 
BPL 30$ sSKIP ERROR IF TX_ACTION CLR FLAG IS CLEAR. 
MOV 9EM2609,R1 iSET UP TX INT WITH “TX_ACTION CLR” MSG. 


3¢ 
; REPORT “TRANSMIT INTERRUPT TEST ERROR:....” 


ERRDF 2607 ,EM2606 ,EROSO3; >>>>> ERROR @2607 <<«<<<, 
TRAP CSERDF 
~-WORD 2607 
WORD EM2606 


SEQ 146 


RARDWARE Fest! 


035254 


035256 
035264 


035266 
035272 
035274 


016136 


032767 
001411 


016702 
001406 
012701 


104455 


005060 
013467 
016174 


F p 
UNC TST PART} | 


000100 


145022 
007415 


165456 
164670 
000300 
144676 
144672 


144736 
000340 


144740 


BIT 


BEQ 


M14 
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#BITO6 ,OPTION 
32% 


-WORD EROSO3 


s¢ 
; EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 


sEXIT WITH TEST FAILURE MESSAGE IF 
sNO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 


VERIFY THAT NO RX INTERRUPTS HAVE BEEN GENERATED SO FAR IN THIS TEST. 


30$: 


MOV 


BEQ 


MOV 
sREPORT “RX 
ERRDF 


RXINTC,R2 
32$ 


sLOAD @ OF RX INTERRUPTS FOR EROSO4 RIN. 
s SKIP ERROR IF NO RX INTERRUPTS. 


MESSAGE ADR FOR INDIRECT PRINT. 


#EMOS25,R1 SET UP 
INTERRUPTS(S) RECEIVED WITH RX INTERRUPTS DISABLED. ” 
2608 ,EM2606 ,EROSO4 


>>>>> ERROR #2608 <<<«<<, 


TRAP “CSERDF 
-WORD 2608 

-VORD EM2606 
-WwORD EROSO4 


3 "DISABLE INTERRUPTS AND CLEAN OUT THE INTERRUPT VECTORS USED IN THIS TEST. 


52: 


34$: 


CLR 
JSR 
JSR 
SETPRI 
CLRVEC 


CLRVEC 


CLR 
SETPRI 


ENDTST 


PC, TXIEO 
PC ,RXIEO 
OPRIOG 


RXVECA 


TXVECA 


CTRLCF 
@PRIO7 


;CLEAR BOTH TRANSMITTER 


; INTERRUPT ENABLE AND RECEIVE 
; INTERRUPT ENABLE BITS IN THE DUT CSR. 
sDISABLE DEVICE INTERRUPTS. 
MOV @PRIOG ,RO 
TRAP C$SPRI 
sRETURN RX INT VECTOR TO UNUSED POOL. 
MOV RXVECA,RO 
TRAP CsCvEC 
sRETURN TX INT VECTOR TO UNUSED POOL. 
MOV TXVECA,RO 


TRAP CsCvec 


sINOICATE THAT WE ARE NOT WITHIN A TEST. 
sDISABLE ALL INTERRUPTS. 


MOV #PRIO7,RO 

TRAP CSSPRI 
L10054: 

TRAP CSETST 


SEG 161 


N14 


GARBURS Ob. 33 FUNC TST PAR LD ey gh tACRO M1200 15-MAR-84 09:15 PAGE 123 “EQ 182 
7062 -SBTTL HARDWARE TEST - BRLEVA - 
7063 344 PEREREEEEEEELEESERSEEEEEEEREREREEEEEEEAEALEEEARAEAEAAEEREAREAEEE REARS 
7064 3% - BR LEVEL TEST B - 
7065 34 THIS TEST VERIFIES THAT THE DEVICE UNDER TEST (DUT) WILL GENERATE 
7066 3* RECEPTION AND TRANSMISSION INTERRUPTS AT THE CORRECT BR LEVEL. 
7067 5% THIS TEST DOES NOT DEPEND ON THE USE OF THE SERIAL LINE TRANSMISSION 
7068 5% OR RECEPTION CAPABILITIES OF THE DUT. THE LINES KARE PUT IN INTERNAL 
7069 54 LOOPBACK TO MINIMIZE ANY EXTERNAL EFFECTS THAT COULD BE CAUSED ON 
Ls ba ;* DEVICES ATTACHED TO THE SERIAL LINES. 
1 i* 
7072 $-- SEREEEEEEREEEEEEEREREREAEEAREEEEEEEEEERAREREEAEAEREEREAEEREREE EAE EEEEE REE 
7073 
7074 035360 BGNTST 
035360 T24:: 
7075 035360 SETPRI #PRIOS ;ALLOW LTC INTERRUPTS. 
35360 012700 000240 MOV #PRIOS,RO 
035364 104441 TRAP C$SPRI 
7076 0000 TNUM == TNUM + ; INCREMENT THE ASSEMBLY TIME TEST COUNTER. 
7077 035366 012767 000030 144730 MOV @TNUM, TSTNUM ;SET UP THE TEST NUMBER. (30) 
7078 035374 012767 177777 144704 MOV #-1,CTRLCF ; INDICATE THAT WE ARE IN A TEST. 
7079 035402 012767 000001 146356 MOV #1,ERRTYP ;SET ERROR TYPE AS FATAL IN ERROR TABLE 
7080 035410 012767 005671 146352 MOV #3001. ,ERRNBR ;SET THE FIRST ERROR NUMBER IN ERROR TABLE 
7081 035416 012767 014223 146346 MOV @EMSOO1,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERRTBL. 
Las 035424 005067 145032 CLR ERSMRF sINITIALIZE THE “REPORT ERROR SUMMARY” FLAGS. 
;* 
7084 ; RESET THE DUT TO A KNOWN STATE, DO NOT REMOVE THE STATUS CODES FROM THE FIFO. 
7085 ; CLEAR TX AND RX INTERRUPT ENABLE BITS IN THE CSR. 
LA» ; THIS SUBROUTINE REPORTS ERRORS FROM >>>>> 3001 THRU 3002 <<<<<. 
= 
7088 035430 004767 163722 JSR PC ,RESETT sRESET THE DHU-11, REPORT ANY ERRORS FOUND. 
7089 035434 103402 BCS 2$ ;SKIP AROUND ABORTING TEST IF NO ERROR FOUND. 
7090 035436 000167 000644 JMP 60$ sABORT TEST IF FATAL ERROR FOUND DURING RESET. 
rons 035442 012767 005673 146320 23: MOV 93003. .ERRNBR ;SET THE ERROR REPORT NUMBER TO 3003. 
3 * 
Le se ; ENABLE TRANSMITTERS ON ALL LINES. 
= 
7095 035450 012705 177777 4$: MOV @MAPLNS RS sPASS ACTIVE LINE BIT MAP. 
reat 035454 004767 165220 JSR PC, TXENBL sENABLE TRANSMISSION ON ALL LINES. 
3* 
7098 ; GENERATE A TRANSMISSION INTERRUPT REQUEST. 
LA 644 ; PROCESSOR PRIORITY SHOULD BE AT 7 DISABLING INTS. 
3. 
7101 035460 SETPRI #PRIO7 ;DISABLE ALL INTERRUPTS. 
035460 012700 000340 MOV #PRIO7,RO 
035464 104441 TRAP CsSPRI 
035466 SETVEC TXVECA,¢TXINTR,@PRIO7 ;SET UP INTERRUPT VECTOR TO CATCH Tx INT. 
35466 012746 000340 MOV #PRIO7, -CSP) 
035472 012746 024146 MOV #TXINTR, -CSP) 
035476 016746 144532 MOV TXVECA, -( SP) 
035502 012746 3 MOV #3, -(CSP) 
035506 104437 TRAP CsSVEC 
035510 062706 000010 ADD #10,SP 
7103 + 
7104 


SET UP DUT FOR hairy INTERRUPTS: 


rH 
a 

7105 ; SET UP INTERNAL LOOPBACK. 

Lp. ; SET UP LINE PARAMETERS FOR TRANSMISSION. 
fing 


B15 
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HARDWARE TES - BRLEVA - 

7108 035514 012705 177777 MOV OMAPLNS ,RS sPASS ACTIVE LINES BIT MASK. 

7109 035520 012700 000200 MOV #200 ,RO sPASS INERT STATE, INTERNAL LOOPBACK. 

7110 035524 004767 166022 JSR PC ,WTWLNC sDISABLE RECPTION AND DMA, ETC. ON DUT. 

7111 035530 012700 156430 MOV #156430,RO sSPECIFY 96008PS,1STOP,NO PARITY,8BITS/CHAR. 

The 035534 004767 166042 JSR PC ,WTWLPR sWRITE INTO ALL LPR REGISTERS. 

3 ca 
pita ; SEND A NULL CHAR TO EACH LINE. 
3 - 
7116 035540 016701 144544 MOV IESTAT,R1 sSET UP THE STATE OF THE INTERRUPT ENABLE BITS. 
337 035544 010177 144472 S$; MOV R1,@CSRA 2 A oS NUMBER AND INTERRUPT ENABLE 
3 ° 

7119 035550 112777 000000 144472 MOVB 00,8FDATA sSEND A NULL CHARACTER TO THE OUTPUT FIFO. 

7120 035556 005201 INC Ri sNEXT LINE. 

7121 035560 020127 000020 CMP R1, ONUMLNS sIF ALL LINES HAVE NOT BEEN SERVICED THEN 

7ige 035564 002767 BLT S$ sBRANCH. 

3 e 
a ; DELAY SO MS TO ALLOW TIME FOR THE INTERRUPT TO BE GENERATED. 
3 ~~ 

7126 035566 012704 000062 MOV 050. .R4 sPASS SO MS TIME TO THE DELAY ROUTINE. 

ta? 035572 004767 162326 JSR PC DELAY sDELAY 50 MILLI-SECONDS. 
3 e 

kT 94 ; GENERATE A RECEPTION INTERRUPT REQUEST. 
Q — 

7131 035576 SETVEC RXVECA,ORXBRRT,OPRIO7 ;SET UP INTERRUPT VECTOR TO CATCH Rx INT. 
035576 012746 000340 MOV @PRIO7, -(SP) 
035602 012746 023756 MOV @RXBRRT, -(SP) 
035606 016746 144420 MOV RXVECA, -(SP) 
035612 012746 000003 MOV o3.,-CSP) 
035616 104437 TRAP CsSvECc 

_ 035620 062706 000010 ADO @10,SP 

5 & 
7335 ; SET UP FOR THE LOOP WHICH TESTS THE INTERRUPT BR LEVELS. 
3 - 
7135 035624 012705 000340 MOV @340,R5 3SET UP THE PRIORITY LEVEL TO 7. 
7136 035630 005003 CLR RS sCLEAR THE RX PRIORITY STORE AND FLAGS. 
at 4 035632 005002 CLR R2 sCLEAR THE TX PRIORITY STORE AND FLAGS. 
3 e 

7139 3; ENABLE TX AND Rx INTERRUPTS. 

A on ; PROCESSOR PRIORITY SHOULD BE AT 7 DISABLING THE INTERRUPTS. 
3 - 

7142 035634 004767 164412 JSR PC RXIE1 sENABLE RECEIVER INTERRUPTS. 

7348 035640 004767 165170 JSR PC, TxXIE1 sENABLE TRANSMITTER INTERRUPTS. 

3° 

rene s LOOP, LOWERING THE PROCESSOR PRIORITY UNTIL THE DUT INTERRUPTS ON Rx AND Ix. 

$ — 

7147 035644 005067 144456 68: CLR TXINTC sCLEAR THE TX INTERRUPT COUNTER. 

7148 035650 005067 144454 CLR TXINTF sCLEAR THE TX INTERRUPT FLAGS. 

7149 035654 005067 144434 CLR RXINTC sCLEAR THE RX INTERRUPT COUNTER. 

7150 025660 005067 144432 CLR RX INTE sCLEAR THE Rx INTERRUPT FLAGS. 

7151 035664 SETPRI RS :SET PROCESSOR PRIORITY TO THE SELECTED VALUE. 
035664 010500 MOV R5.RO 
035666 104441 TRAP CSSPRI 

7152 035670 012704 000001 MOV #1,R4 sPASS 1 MS COUNT TO THE DELAY ROUTINE. 

uF 5 035674 004767 162224 JSR PC DELAY sDELAY 1 MS TO ALLOW INTERRUPTS TO OCCUR. 


3 
7155 ; DETERMINE IF ANY RX DUT INTERRUPTS OCCURRED. 
7156 s LOG THE PROCESSOR PRIORITY FOR THE RX INTERRUPT IF FIRST Rx INT. 


O DHU-11 FUNC TST 


CZ0HUB 
HARDWARE 


7159 


TEST 


035700 
035704 


035732 
035736 


035740 
035742 
035744 
035746 


036006 


204 036010 


005767 
001412 


005702 
100420 


eh 
2 
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144410 


100000 
144372 
137777 


144370 


100000 


000340 


144234 


144230 


TST oe s;CHECK THE RECEIVE INTERRUPT COUNTER 


BEQ ;SKIP THE PRIORITY LOG IF NO RX INT OCCURRED. 
3* 
s IF THIS IS THE FIRST RX INTERRUPT, LOG THE PRIORITY. 
3 - 
TST RZ ;CHECK THE RX PRIORITY STORE AND FLAGS. 
BNE 8s -" sGOTO TEST FOR TX INTS IF NOT THE FIRST Rx INT. 


3L.0G THE PRESENT PRIORITY IN THE Rx PRIO STORE. 
;SET THE RX INT HAS GCCURRED FLAG. 

sGET THE RX INTERRUPT ROUTINE FLAGS. 

BIC 0137777,RO sCLEAR ALL BUT THE TX INT ERROR FLAG. 

BIS RO,RS sIF TX INT ERROR, SET BIT 14 OF THE PRIO FLAGS. 


3* 
; DETERMINE IF ANY TX DUT INTERRUPTS HAVE OCCURRED. 
; LOG THE PRESENT PROCESSOR PRIORITY IF THIS IS THE FIRST Tx INTERRUPT. 


; TXINIC :CHECK THE TRANSMIT INTERRUPT COUNTER. 


8$: TST 
BEQ 10$ sSKIP THE PRIORITY LOG IF NO TX INT OCCURRED. 


3° 
s IF THIS IS THE FIRST TX INTERRUPT, LOG THE PRIORITY. 


BIS 66IT15,R3 
MOV RXINTF ,RO 


TST Re sCHECK THE TX PRIORITY STORE AND FLAGS. 
BMI 10$ SKIP THE LOGGING IF NOT FIRST Tx INTERRUPT. 
MOV sLOG THE PRESENT PRIORITY IN THE TX PRIO STORE. 


RS,R2 
81S #BIT1S5,R2 3SET THE TX INT HAS OCCURRED FLAG. 


3° 
; SELECT NEXT PROCESSOR PRIORITY. 
; TEST FOR BOTH RX AND TX INTERRUPTS HAVING OCCURRED, LOOP IF NOT. 


+ i 
10$: SUB #40 ,R5 sDECREMENT PRIORITY LEVEL BY ONE. 
BLT i2$ sGOTO CHECK FOR ERRORS IF BELOW PRIORITY ZERO. 
BIT R2,R3 3sAND PRIO FLAGS TOGETHER, ALTER NONE OF THEM. 
BPL 6$ sLOOP IF RX AND TX INTS HAVEN’ T BOTH OCCURRED. 


3° 
; DISABLE INTERRUPTS AND CLEAR INTERRUPT VECTORS. 


g ° 
128: SETPRI @PRIO7 sDISABLE ALL INTERRUPTS. 
MOV OPRIO7 ,RO 
TRAP CsSPRI 
CLRVEC RXVECA sRETURN RX INT VECTOR TO UNUSED POOL. 
MOV RXVECA,RO 
TRAP Cscvec 
CLRVEC TXVECA sRETURN TX INT VECTOR TO UNUSED POOL. 
MOV TXVECA,RO 
TRAP CscCvec 


3; * 

; VERIFY THAT RX ANDO TX INTERRUPTS OCCURRED, 
; AT THE PROPER BR LEVEL. AND 

; IN THE PROPER ORDER. 

; DETERMINE IF TX INTERRUPT OCCURRED. 


> 
TST Re sDETERMINE WHETHER Tx INT OCCURRED OR NOT. 
BMI 16% ;SKIP THESE ERRORS IF Tx INT OCCURRED. 


;° 
: DETERMINE REASON THAT NO TX INT OCCURRED. 
hs 


SEG 184 


RARBWARe Fs +! 


7309 86016 
0 036022 


0 
036024 


012701 


104455 
005673 
014225 
016136 


032767 
001513 


000427 


012701 
032777 
001002 
012701 


013752 
144220 
014044 


000100 


177400 


144140 


014356 


000100 


014127 
000200 


014262 


DiS 
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MOV #EM2610,R1 sSELECT “NO TX INT FROM Tx. gt ee: 
TST — sCHECK THE TX.ACTION BIT OF THE DUT CSR 
BMI :SKIP TX.ACTION CLR MSG SELECTION IF IT IS SET. 
MOV oEN26 611,R1 ;SELECT "TX, ACTION CLEAR AFTER CHARS SENT” MSG. 
;REPORT “INTERRUPT BR LEVEL. TEST ERROR: 
14$: ERRDF 3003 ,EM3001 ,EROSO3; >»>>>> ERROR ©3003 <<ccc, 
TRAP C SERDF 
-WORD 3003 
-WORD EM3001 
-WORD EROSO3 


3° 
; EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 


144156 BIT @BITO6 ,OPTION sEXIT WITH TEST FAILURE MESSAGE IF 
BEQ 26% sNO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 
BR 18$ :;SKIP THE BR LEVEL CHECK, NO TX INT OCCURRED. 
3° 
; VERIFY THAT THE TX INTERRUPT WAS AT THE PROPER BR LEVEL. 
168: MOV R2,R4 sCALCULATE THE BR LEVEL 
BIC #177400 ,R4 ; THAT THE TRANMSIT 
ASR R4 ; INTERRUPT WAS 
ASR R4 ; REQUESTED AT, WHICH 
ASR R4 ; IS ONE GREATER THAN 
ASR R4 ; THE PROCESSOR PRIORITY 
ASR RS ; LEVEL AT WHICH 
INC R4 : TRANSMIT INTERRUPT OCCURRED. 
MOVG BRLEVL,RS sGET THE EXPECTED INTERRUPT BR LEVEL. 
CMPB RS sCOMPARE THE INTERRUPT BR LEVEL WITH EXPECTED. 
BEQ 183 sSKIP THE ERROR IF BR LEVEL IS CORRECT. 
sREPORT “TX INTERRUPT GENERATED AT WRONG BR LEVEL: ... 
MOV #EM3003,R sSELECT THE ERROR MESSAGE FOR THE ERROR CALL. 
ERROF 3004 EMS0o1. ER3O01; >>>>> ERROR 835004 <<<<<, 
TRAP “ CSERDF 
. WORD 3004 
-WORD EM3001 
-WORD ERS3001 
3° 
; EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 
144076 BIT #BITO6,OPTION sEXIT WITH TEST FAILURE MESSAGE IF 
BEQ 263 sNO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 
3° 
; DETERMINE IF RX INTERRUPT OCCURRED. 
3 
18%: TST RS ;CHECK THE RX INT GCCURRED F 
BMI 223 ;SKIP THESE ERRORS IF Rx INT OCCURRED. 
3° 
; DETERMINE REASON THAT NO RX INT OCCURRED. 
a 
MOV EM2612,R1 ;SELECT “NO RX INT FROM RX.DATA. AVAIL” MSG. 
144074 BIT BIT7,aCSRA i CHECK THE RX.DATA. AVAIL BIT OF THE DUT CSR. 
BNE 20% sSKIP RX.DATA.AVAIL CLR MSG IF BIT IS SET. 
MOV 9EM3002,R1 SSELECT “NO RX. DATA.AVAIL AFTER RESET’ MSG. 


SEQ 185 


SERRE HSH! UNE 151 


299 
7300 036276 
7301 036302 


032767 
001441 


000427 


120405 
001412 
012701 
104455 


005676 
014223 
016620 


032767 
001411 


032703 
001406 


012701 
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20%: 


000100 144032 


177400 


144014 


014432 


000100 


040000 


014506 


164472 
163704 


22%: 


143752 


3 
243: 


sREPORT “INTERRUPT BR LEVEL TEST ERROR:” 
ERROF 33 


Eis 


3005 ,EM3001 , EROS 


>>>>> ERROR @3005 <cccc, 


TRAP CSERDF 
-WORD 3005 

-WORD EM3001 
-WORD EROSO3 


ge 

$ Ext THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 
OB ITO6,OPTION 
263 


BIT 
BEQ 


24% 


sEXIT WITH TEST FAILURE MESSAGE IF 
sNO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 


;SKIP THE BR CHECK IF NO RX INT OCCURRED. 


g° 
3; VERIFY THAT THE RX INTERRUPT WAS AT THE PROPER BR LEVEL. 


R3,R4 


177400 ,R4 


sCALCULATE THE BR !EVEL 
; THAT THE RECEIV E 

: INTERRUPT WAS 

; REQUESTED AT, WHICH 

s IS ONE GREATER THAN 
: 
3 


343 SKIP 
Pdi vv gl GENERATED AT WRONG BR LEVEL: .. 
9E€M3004 , 


3006 ,EM3001 1,ER3001; 


R1 


sSELECT ERROR MESSAGE FOR. THE ERROR CALL. 


>>>>> ERROR 83006 <<<c<, 
TRAP “CSERDF 
- WORD 3006 
-WORD EM3001 
. WORD ER3001 


3¢ 

; EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 
9B ITO6 OPTION 
26% 


BIT 
BEQ 


sEXIT WITH TEST FAILURE MESSAGE IF 
sNO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 


3 ¢ 
; TEST FOR INTERRUPTS OCCURING IN THE PROPER ORDER. 


BIT 


oB1T14,R35 
26 


ones THE IMPROPER INT ORDER ERROR FLAG. 
RROR REPORT IF ERROR DID NOT OCCUR. 


BEQ $ 3SKIP 
sREPORT “TX senicos GIVEN BRECEDENCE OVER SIMULTANEOUS RX INT.’ 


MOV 
ERRDF 


®EM3005 


1 
3007,EM3001, EROSOS; 


3 
; CLEAN UP, EXIT THE TEST. 


263: 


JSR 
JSR 


PC, TXIEO 
PC ,RXIEO 


sSELECT THE ERROR MESSAGE FOR INDIRECT PRINT. 
>>>>> ERROR @3007 «<««c<, 


TRAP “CSERDF 
-WORD 3007 

-WORD EM3001 
-WORD EROSOS 


sCLEAR TRANSMITTER INTERRUPTS. 
sCLEAR RECEIVER INTERRUPTS. 


SEG 146 


CZDHMUBO DHU-11 FUNC TST P 


MARDWARE TEST 


7302 036206 
7303 036312 
036312 
036316 

7304 0363520 
036320 

4 036320 


143774 
000340 


60$: 


CTRLCF 
&PRIO7 


= 
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sINDICATE THAT WE ARE NOT WITHIN A TEST. 


sDISABLE ALL INTERRUPTS. 


L100S55: 


MOV 


TRAP 


TRAP 


#PRIO7,RO 
CsSPRI 


CsETST 


SEQ 187 


CZ0HUBO 


OHU -11 


MAROWARE TEST 


012767 


004767 
103103 


016705 
005004 
016703 
000241 


5 
103070 


012767 


016702 


FUNC TST PARTI 
- DIABMP 


014600 
017222 


161402 


143622 
143626 


164540 


MACRO 1200 


G15 
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-SBTTL HARDWARE TEST - OIABMP - 


3°? OOCOPREDAESESAEDESEDESESEEEEEEEELERESEDEDEREEEEEEDEEDEDEDEEEEDDEEEEEDEDEES . 


;* DIAGNOSTIC FIELD (BMP) TEST - 
54 THIS TEST VERIFIES THAT A REQUEST TO THE DUT TO REPORT BMP STATUS 
34 CODES IS COMPLIED WITH, WITHIN THE SPECIFIED TIME. 
34 ALL ACTIVE LINES ARE TESTED. 
§-- SEEBBBEESEESSSSESSESESADSSEAEEESEEEAEEEEEAODEREAEREDDEDEEREEDADEDAEDEAEEAE‘S 
BGNTST 
T25:: 
SETPRI #PRIOS sALLOW LTC INTERRUPTS. 
44 #PRIOS ,RO 
RAP C$SPRI 
TNUM == TNUM «+ s INCREMENT THE ASSEMBLY TIME TEST COUNTER. 
MOV @TNUM, TSTNUM ;SET UP THE TEST NUMBER 31) 
MOV #-1,CTRLCF S INDICATE THAT WE ARE IN A TEST. 
MOV #1,ERRTYP sSET ERROR TYPE AS FATAL IN ERROR TABLE. 
MOV #3101. ,.ERRNBR ISET THE FIRST ERROR NUMBER IN ERROR TABLE. 
MGV #EM3101,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERRTBL 
MOV ER9101,ERRBLK ;SELECT THE CORRECT ERROR REPORTING ROUTINE. 


3 * 

; RESET THE DUT TO A KNOWN STATE, REMOVE THE STATUS ans FROM THE FIFO. 
; CLEAR TX AND RX INTERRUPT ENABLE BITS IN THE CSR 

; THIS SUBROUTINE REPORTS ERROR >>>>> 3101 <<<c<. 


5.= 
JSR PC .CLNRST sRESET THE DHU-11, REPORT ANY naan FOUND . 
BcC 60$ sRESET FAILURE?, ABORT THIS TEST 


;* 

; TEST ALL ACTIVE LINES INDIVIDUALLY. 

; WRITE THE REQUEST CODE TO THE DIAGNOSTIC FIELD IN THE oe ere 
; VERIFY THAT A BMP CODE IS RETURNED WITHIN THE CORRECT 


MOV ACTLNS,RS sGET THE ACTIVE LINE BIT MAP. 
CLR R4 sCLEAR THE LINE NUMBER COUNTER. 
MOV CSRA,RS sGET THE ADDRESS OF THE DUT’S CSR. 
2$: CLC sCLEAR THE CARRY BIT PRIOR TO SHIFTING BIT MAP. 
ROR RS sSHIFT THE BIT MAP INTO THE CARRY BI1 
BCC 8$ ;00 NOT TEST THE LINE IF IT IS INACTIVE. 
> 
; SELECT THE LINE UNDER TES 
; WRITE THE BMP REQUEST CODE TO THE DIAG FIELD IN THE LPR REGISTER. 
MOV #3102.,ERRNBR ;SET THE ERROR NUMBER TO 3102. 
MOV R4,(RS) sSELECT THE LINE CURRENTLY UNDER TEST. 
BIS 92, @LPRA sWRITE THE BMP REQUEST CODE TO THE LPR. 


3 * 
5 ee BMP REQUEST CODE TO BE CLEARED, REPORT ERROR IF TIME -OUT 
b . 


MOV #11750,R1 sTEST BIT 1, TIMEOUT OF 1 SEC. 

MOV LPRA,R2 sPASS THE ADDRESS OF gs “haa TO TEST. 

JSR PC ,WAIBIC sWAIT FOR REQUEST CODE TO CLEAR 

BCC 6% ;GO REPORT ERROR IF CODE DID NOT CLEAR IN TIME. 


3? 
; WAIT FOR BMP CODE TO APPEAR IN THE FIFO, REPORT ERROR IF TIME -OUT 
; OCCURS. 

> 


SEQ 


188 


005267 
012701 
016702 
004767 
103031 


010401 
012702 


104460 


032767 
001403 


005204 
005705 
001302 
005067 


104401 


145264 
143534 


145252 
170301 
145236 
177760 
000305 
163516 


014643 


000100 


143372 


143424 


6$: 


3° 
; EXIT THE TEST IF EXTENDED 


3 * 


His 
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ERRNBR 
#70012,R1 
SRA,R 


CSRA, 
PC,WAIBIS 
63 


SEQ 189 


sSET ERROR NUMBER TO 3103. 

sTEST BIT 7, TIMEOUT OF 10 MILLI SECS. 

sPASS THE ADDRESS OF THE REGISTER TO TEST. 
sWAIT FOR RX_DATA_AVAILABLE TO SET. 

GO REPORT ERROR IF CODE DID NOT CLEAR IN TIME. 


; READ THE BMP CODE CIF IT IS THERE) FROM THE RBUF REGISTER. 
; DETERMINE IF IT IS A VALID BMP CODE, 
; VERIFY THE BMP CODE WAS RECEIVED FROM THE CORRECT CHANNEL. 


; If THE BHP CODE DOES NOT INDICATE DUT RUNNING OK, 
; THE QUEVE TO BE REPORTED IN A LATER TEST. 


BIT 
BEQ 


ERRNBR 
ae ne 


ERRNBR 
#170301 ,R0 
»RO 


6$ 
ERRNBR 
R2,RO 


RO 
#177760,RO0 
R4,RO 


R4,R1 
9EM3102 ,R2 


#BIT0O6 ,OPTION 
60$ 


THEN SAVE IT ON 


sSET ERROR NUMBER TO 3104. 

sGET THE BMP CODE FROM THE FIFO. 

;GO REPORT ERROR IF NO BMP CODE FOUND. 
;SET ERROR NUMBER TO 3105. 
;SET-UP A BMP CODE MASK. 
;TRY TO CLEAR THE BMP MASK. 
:;GO REPORT ERROR IF IT IS NOT A VALID BMP CODE. 
;SET THE ERROR NUMBER TO 3106. 

;COPY THE BMP CODE. 

sPUT THE LINE NUMBER IN THE LOW BYTE. 

sCLEAR THE UNWANTED BITS. 

;DID THE BMP CODE COME FROM THE CORRECT LINE?. 
3NO; GO REPORT ERROR. 

:IS THE BMP CODE A "GOOD ONE”?. 

;YES; SKIP SAVING THE BMP CODE ON THE QUEUE. 
sSAVE THE BMP CODE ON THE QUEUE. 

sGO SEE IF THERE ARE ANY MORE LINE TO TEST. 


sPASS THE LINE NUMBER TO BE REPORTED. 
sPASS THE ERROR MESSAGE TO BE REPORTED. 
;"BMP REQUEST BIT BAD ON LINE:” 

: >>>>> ERROR <<<<c, 


TRAP CSERROR 


ERROR REPORTING HAS NOT BEEN ENABLED 


sEXIT WITH TEST FAILURE MESSAGE IF 
sNO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 


3° 
; VERIFY ALL ACTIVE LINES HAVE BEEN TESTED. 


s INCREMENT THE LINE NUMBER COUNTER. 

sARE THERE ANY MORE ACTIVE LINES TO TEST?. 
;YES; BRANCH TO TEST THE NEXT LINE. 
sINDICATE THAT WE ARE NOT WITHIN A TEST. 


L100S56: 


TRAP CSETST 


O DHU-11 FUNC TST PART1 
- DIABMP 


CZ0HUB 
HAROWARE TEST 


7411 


017262 
012767 
005067 


104401 


000032 
177777 
143666 
002526 


015433 


002526 
143412 


Ti5 
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143500 
143454 


143634 


-SBTTL HARDWARE TEST 


- REPBMP - 


s+ SAESESESEESEDEEEESEDEEESESAAEEAEEEEEEARESEREEEDDADEEEDEEEEDADAEEREEEEEAESOS 


& 


- REPORT ANY BMP CODES IN THE QUEVE - 


oe THIS IS A _PSEUDO-TEST USED TO REPORT ANY BMP CODES THAT WERE FOUND 
34 IN THE DUT‘S FIFO DURING PREVIOUS TEST, AND LOGGED IN THE BMP CODE 
3% @ 
34 IT IS UNLIKELY THAT RUNNING THIS PSEUDO-TEST ALONE WILL PRODUCE ANY 
- ERROR REPORTS. 
+ 
Sa SPSEEAREEEELESEEEEEEREEEALAREEEAEASEREASEAEAAEDE SEERA EAEEEEERAREEEEEEAADDES 
BGNTST a 
TNUM == TNUM + 1 sINCREMENT THE ASSEMBLY TIME TEST COUNTER. 
MOV =: @TNUM, TSTNUM ;SET UP THE TEST NUMBER. (93) 
MOV 4-1, CTRLCF sINDICATE THAT WE ARE IN A TEST. 
MOV  BMPCQP,R2 sGET THE CONTENTS OF THE POINTER. 
MOV OBMPCOB ,R3 ;GET THE START ADDRESS OF THE QUEUE. 
CMP =s_- R2, R3 ;SEE IF THE POINTER HAS MOVED FROM THE BASE. 
BEQ 60$ sEXIT NO CODES IN THE QUEUE. 


3* 
; THERE IS AT LEAST ONE BMP CODE IN THE QUEUE. REPORT THE ERROR. 


60$: 


sREPORT ERROR BMP CODE FOUND IN TEST NN, BMP CODE :NNNNNN” 


MOV 9EMN9304 ,R1 sPASS THE FIRST MESSAGE TO BE REORTED. 
ERRDF 9301 .EM9301,ER9301 ; >>>>> ERROR $9301 <<<<c, 
TRAP CSERDF 
. WORD 9301 
-WORD EM9301 
. WORD ER9301 
MOV #BMPCQB.BMPCQP ;SET POINTER BACK TO THE BEGINING OF THE QUE. 
CLR CTRLCF ; INDICATE THAT WE ARE NOT WITHIN A TEST. 
ENDOTST 


L1005?: 


TRAP CSETST 


SEO 190 


CZDHUBO DHU - 
HARDWARE TEST 


000022 


000031 
036744 
160000 
177776 


001031 
036762 
000040 
000776 
002032 
037015 
177777 
177777 


11 FUNC TST PARTI 
- REPBMP 


J15 
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-SBTTL HARDWARE PARAMETER CODING SECTION 


HE HARDWARE PARAMETER CODING SECTION CONTAINS MACROS 
THAT ARE USED BY THE SUPERVISOR TO BUILD P-TABLES. 


THE 


ARE NOT EXECUTED AS MACHINE INSTRUCTIONS BUT 


BGNHRD 


MACROS 

INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES. 
MACROS ALLOW THE SUPERVISOR TO ESTABLISH COMMUNICATIONS 
WITH THE OPERATOR. 
i == 


sDEVICE CSR ADDRESS QUESTION: 
GPRMA 


HWPTQ1,.0,0,160000,177776, YES 


sDEVICE INTERRUPT VECTOR QUESTION: 
GPRMA 


HWPTQ2,2,0,40, 776, YES 


sACTIVE LINES BIT MAP QUESTION: 
GPRMD 


HWPTQ3.4,0,MAPLNS,O,MAPLNS, YES 


s INTERRUPT BR LEVEL QUESTION: 
GPRMD 


ENOHRD 


HWPTQ1: 


HWPTQ4.6,0,377,0.6. YES 


-ASCIZ /CSR ADDRESS: / 


LSHARD: : 


L10060: 


-WORD L10060-L SHARD /2 


ash) 5588 983 


.EVEN 


T $CODE 
HWPTO1 
TSLOLIM 
TS$HILIM 


TSLOLIM 


NS 
TSLOLIM 


TSLOLIM 
TSHILIM 


, 
GARDE PARA TEN cos 
7496 036762 111 
036765 105 
036770 125 
036773 040 
036776 103 
037001 122 
037004 104 
037007 105 
037012 ~=s«O72 
7497 037015 101 
037020 111 
037023 040 
037026 116 
037031 102 
037034 040 
037037 120 
037042 000 
7498 037043 111 
037046 105 
037051 125 
037054 040 
037087 040 
037062 126 
037065 072 

7499 


7500 


T PART 


ING SECTION 


KS 
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HWPTQ2: 


HWPTQ3: 


HWPTQ4: 


EVEN 


-ASCIZ /ACTIVE LINE BIT MAP: 


-ASCIZ /INTERRUPT BR LEVEL: 


/ 


-ASCIZ /INTERRUPT VECTOR ADDRESS: 


/ 


/ 


SEG 192 


: F T 
HARDWARE PARAMETER COB 
7509 
7510 
7511 
7512 
7513 
7514 
7515 
7516 
7517 
7318 
7519 
7520 
7521 
7522 037070 
037070 000017 
037072 
7523 
7532 
7533 037072 
037072 000130 
037074 037130 
037076 000020 
7534 
7535 037100 
037100 000130 
037102 037204 
037104 
7536 
7537 037106 
037106 000130 
037110 037255 
037112 000100 
7538 
7539 
7540 
7541 037114 
037114 006044 
7542 
7543 
7544 037116 
037116 001052 
037120 037310 
037122 177777 
037124 000000 
037126 177777 
7545 
7546 
7547 037130 
037130 
7548 
7549 
7556 037130 122 
037133 117 
037136 040 
037141 111 
037144 116 


T PART 


bed 
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ING SECTION 
105 120 
122 124 
125 116 
124 040 
125 115 


-SBTTL SOFTWARE PARAMETER CODING SECTION 


s+ 

THE SOFTWARE PARAMETER CODING SECTION CONTAINS MACROS 
THAT ARE USED BY THE SUPERVISOR TO BUILD P-TABLES. THE 
MACROS ARE NOT EXECUTED AS MACHINE INSTRUCTIONS BUT ARE 
INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES. THE 
MACROS ALLOW THE SUPERVISOR TO ESTABLISH COMMUNICATIONS 
WITH THE OPERATOR. 


T $CODE 


SWPTQ1 
20 


T $CODE 
SWPTQ2 
1 


T $CODE 
SWPTQ3 
100 


TSLOLIM 
TSHILIM 


BGNSF T 
L$SOFT:: 
;UNIT NUMBER PRINTOUT QUESTION: 
GPRML SWPTQ1.0,20, YES 
. WORD 
. WORD 
- WORD 
;ROM VERSION NUMBER PRINTOUT ON FIRST PASS QUESTION: 
GPRML SWPTG@2.0,1, YES 
. WORD 
. WORD 
. WORD 
;EXTENDED ERROR REPORTING QUESTION: 
GPRML SWPTQ3,.0,100, YES 
. WORD 
. WORD 
. WORD 
3;* 
; IF EXTENDED ERROR REPORTING IS NOT REQUIRED THEN SKIP THE NEXT QUESTION. 
3* 
XFERF ENDD 
. WORD 
;NUMBER OF INDIVIDUAL DATA ERRORS TO REPORT ON A LINE QUESTION: 
GPRMD SWPTQ4 ,.2.0,.177777,0,177777, YES 
. WORD 
. WORD 
.WORD 
. WORD 
. WORD 
-EVEN 
ENDD: ENDSF T 
EVEN 
L10061: 
SWPTQ1: .ASCIZ /REPORT UNIT NUMBER AS EACH UNIT IS TESTED: / 


SEQ 


-WORD L10061-L$SOFT/2 


193 


-11 FUNC _T 
SOP TURE PARAM TEN COB 
7147 
S37iss 888 
037155 040 
037160 103 
037163 125 
037166 124 
037171 123 
037174 105 
037177 105 
037202 040 
7557 037204 122 
037207 040 
037212 122 
037215 117 
037220 120 
037223 116 
037226 125 
037231 117 
037234 124 
037237 040 
037242 122 
v57245 040 
7250 123 
037253 040 
7558 037255 105 
037260 105 
037263 105 
037266 105 
037271 117 
037274 122 
037277 117 
037302 111 
037305 072 
7559 037310 116 
037313 102 
037316 040 
37321 040 
037324 104 
037327 111 
037332 101 
037335 104 
037340 101 
037343 122 
37346 122 
037351 124 
037354 122 
037357 117 
037362 040 
037365 040 
037370 114 
037373 105 
037376 000 


T PART 


MAC 


ING SECTION 
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SWPTQ2: .ASCIZ /ROM VERSION PRINTOUT ON THE FIRST PASS: / 


SWPTQ3: 


SWPTQ4: .ASCIZ /NUMBER OF INDIVIDUAL DATA ERRORS TO REPORT ON A LINE: / 


-EVEN 


M15 


-ASCIZ /EXTENDED ERROR REPORTING: / 


SEG 


194 


Ni5 
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756 

757 

7571 0374090 $PATCH: : 

7572 037400 .BLKW 24 
7573 


3 
7584 037450 LASTAD 
.EVEN 
037450 000000 -WORD O 
000000 -WORD O 
37454 ieee cas 


7593 000001 . END 
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YMBOL TABLE 
ACTLNS 0022350 G Cc * 000052 DROP 025122 EMO902 010766 G EM9023 015217 G 
ADR G CSAUTO* 000061 DROOMG 005464 G EM1001 011022 G EM9024 015241 G 
TR 017764 G CSBRK = 000022 DRO2ZMG 005470 G EM1002 011055 G EM9301 015257 G 
ALTFLD 017454 G CSBSEG= 000004 005475 G EM1003 011142 G EM9302 0153%6 G 
ASSEMB= 000010 CsB8SUB- 000002 ORO6MG 005501 G EM1101 011220 G EM9503 015366 G 
BCOUNT 002352 G CSCEFG= 000045 DRIOMG 005517 G EmM1201 011273 G EM93504 015433 G 
BITTBL 002410 G CSCLCK= 000062 OR12MG G EmM1202 011321 G ENDD 037130 
BITO = 000001 G CSCLEA* 000012 OR14MG 005537 G EM1203 011405 G ENDETB 003726 G 
BITOO « 000001 G CSCLOS* 000035 DRI6MG 005550 G EM1204 011463 G ENDOIT 025042 
BITOL = 000002 G CSCLPi- E 25200 EM1205 011517 G ERCNTB 002464 G 
BITO2 « 000004 G CsCVEC= 000036 EF .CON= 000036 G EM1301 011543 G ERLTBL 002726 G 
BITOS = 000010 G CSOCLN- EF .NEW= 000035 G EM1302 011576 G E K 003774 G 
LTO4 = 000020 G C$000uU- 1 EF .PWR= 000034 G EM1401 011635 G ERRMSG 003772 G 
BITOS = 000040 G CSORPT= 000024 EF .RES= 000037 G EM1402 011674 G ERRNBR 003770 G 
IT06 = 000100 G Cs0uU = 000053 EF .STA= 000040 G EM1403 011762 G ERRTYP 003766 G 
BITO7? = 000200 G CSEDIT= 000003 EF 004074 G EM1404 012035 G ER 002462 G 
BITO8 = 000400 G SEROF = 000055 EF 004101 G EM1405 012107 G ERO101 015510 G 
BITO9 = 001000 G CSERHR= 000056 EF1401 004154 G EM1406 012122 G ERO2O1 016042 G 
BITL * 000002 G CSERRO= 000060 EF 1402 G EM1407 012135 G EROSOS 016136 G 
BIT10 = 002000 G CSERSF= 000054 EF1601 0043135 G EM1408 012147 G EROSO4 016174 G 
BIT11 = 004000 G CSERSO= 000057 EF 1602 5G EM1501 012155 G ER1401 016254 G 
BIT12 = 010000 G CSESCA= 000010 EF16035 004407 G EmM1502 012203 G ER1601 016416 G 
BITI3 * 020000 G CSESEG= 000005 EF1604 004451 G EM1601 012221 G ER1603 016526 G 
BIT14 = 040000 G CSESUB= 000003 EF 3001 G EM1604 012304 G ER3001 016620 G 
BITS = 100000 G CSETST= 000001 EF3002 004615 G EM1701 012360 G ER9004 016722 G 
BIT2 = 000004 G CSEXIT= 000032 EF 9006 G EM1801 012443 G ER9007 017036 G 
BITS = 000010 G C8GETB= 000026 EF9010 004710 G EM1901 012517 G ER9008 017126 G 
BITS = 900020 G C8GETW= 000027 EF9016 004777 G EM2001 2G ER9101 017222 G 
BITS = 000040 G CSGMAN= 000043 EF9017 005074 G EM2002 012652 G ER9301 017262 G 
BIT6é = 000100 G C8GPHR= 000042 EF9018 005150 G EM2301 012725 G EVL . 
BIT7 = 000200 G C$GPLO= 0000350 EF 9301 3G EM23502 012772 G EXOERR 002304 G 
BIT8 = 000400 G 8GPRI= 000040 EF9302 005353 G EM2401 013030 G ESEND = 002100 
BIT9 = 001000 G CSINIT= 000011 EM0101 020360 G EM2601 013073 G ESLOAD= 000035 
| QB 002526 G CSINLP= 000020 EMO102 020444 G EM2602 013131 G FDOATA 002250 G 
‘BMPCQE 002726 G CSMANI= EMO103 005560 G EM2603 013222 G FSLSA 002250 G 
‘BMPCQP 002524 G CS8MEM = 000031 E 3 005616 G EM2604 013310 G FSLSO = 
* 000400 G C8MSG = 000025 E 005651 G EM2605 013404 G FSAU = QOOO15 
BRLEVL 002240 G CSOPEN= 000034 EMO205 006024 G EM2606 0153467 G FSAUTO= 000020 
BUFBAS 002726 G CSPNTB= 000014 E 006167 G EM2607 013526 G FSBGN = 000040 
BUFEND 003726 G CSPNTF= 000017 EMO301 G EM2608 013622 G FSCLEA= 000007 
BUFMID 003326 G CSPNTS= 000016 EMOSO2 006420 G EM2609 013673 G FSDU = 000016 
BUFPTR 002 G CSPNTX= iS EMO305 G EM2610 013752 G FSEND = 000041 
BUFSQT 003526 G CsQIO = 000377 EMO401 006737 G EM2611 014044 G FSHARD= 000004 
CACHRX 023632 G CsROBU- 7 EMO402 007015 G EM2612 014127 G FSHw = 000013 
CACHTX 023660 G CS8REFG= 000047 EMO0SO1 007165 G EMS001 014223 G FSINIT= O00006 
C 017526 G CS8RESE= 000033 EMOSO2 007241 G EMSO02 014262 G FSJMP = 000050 
CKTRAP 017752 G CsREvI= 3 EMOS2S 007415 G EMSOOS 014356 G FSMOD = 
CLKBRL 002336 G CSRFLA= 000021 EMOS26 007 G EM3004 014432 G FSMSG = 000011 
CLKCSR 002334 G CS8RPT = 000025 EMO601 007575 G EMSOOS 014506 G FSPROT= 000021 
CLKMRZ 002342 G CSSEFG= 000046 EMO602 007637 G EM3S101 0O G FSPWR = 000017 
CLKINT 023706 G CSSPRI= 000041 EMO603 010017 G EM3S102 014643 G FSRPT = OOOO12 
CLKVEC 002340 G CSSVEC= 000037 EMO701 010202 G EM9014 014722 G FSSEG = 000C03 
CLNRST O G CsTPRI= 000013 EMO702 010245 G EM9017 015016 G F$SOF T= QOO0O0S 
CLR16W 020024 G DELAY 020124 G EMO703 010425 G EM9018 015127 G FSSRV = 090010 
CNTERR 020046 G OFPTBL 002212 G EMO8O1 010610 G EM9019 015137 G FSSUB = 000002 
CSRA 002242 G DIAGMC= 000000 EMOB6O02 010656 G EM9020 015154 G FSSW = 000014 
CTRLCF 002306 G DRADRT 002242 G EMO901 010726 G EM9022 015200 G FSTEST= OOOOOL 
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GETPRM 024640 LPRO = 000004 G L10002 015624 MSLOOP 020300 G SFPTBL 002224 G 
GPRSOB 002450 G Lsace 902110 G L 10003 MSTICK 002354 G SKPSTS 022344 G 
GSCNI9* 000200 LSAPT 002036 G L 016172 RPT 002226 G SVCGBL = 000000 
G$DELM= 000372 Lsau sO G L10005 016252 NEWPAS 024620 SVCINS= 000001 
GsDISP= 000003 L$AUT 002070 G L10006 016414 NEWRES 024612 SVCSUB= 000001 
GSEXCP= 000400 LSAUTO 025056 G L10007 016524 NEWSTA 024302 SVCTAG= 000001 
GSHILI= 000002 LSCCP 002106 G L10010 016616 NUMLNS = SVCTST= 000001 
GSLOLI= 000001 LSCLEA G L10011 016720 OOPS 020314 G SWAPO 022422 G 
G$NO = 000000 L$CO 002032 G L10012 017034 OPTION 002224 G SWPTQ1 037130 
GSOFFS= 000400 L$DEPO 002011 G L10013 017124 OSAPTS= SWPTQ2 037204 
GSOFSI= 000376 L$DESC G L10014 017220 O$AU = 000000 SWPTQ3 037255 
GSPRMA= 000001 LSDESP 002076 G L10015 017260 OSBGNR= 000001 SWPTQ4 037310 
G$PRMD= 000002 L $DEVP G L10016 017452 O$BGNS= 000001 S$LSYM= 010000 
G$PRML= 000000 L$DISP 002124 G L10017 024226 O$DU = 000001 TIMER1 002344 G 
G$RADA* 000140 L$DLY 002116 G L10021 OSERRT= 000001 TIMERS 002346 G 
G$RADB = LSDTP OG L10022 025056 OSGNSW= 000001 TIMERS 002350 G 
GRADD= 000040 LSDTYP 002034 G L10023 025074 OSPOIN= 000001 T = 000032 G 
G$RADL= 000120 L$0U 025076 G L10024 025204 O$SETu= TP4FLG 002320 G 
$RADO= 000020 L$DUT 002072 G L10025 025212 PAROA 002366 G TP4RTN 024124 G 
GSXxFER= LSDVTY 004036 G L10026 025474 PASCNT 002312 G TP4VEC 002322 G 
G$YES = 000010 LSEF 002052 G 10027 025724 PCSLOT= 000016 G TSABRT 022472 G 
HELP = LSENVI 002044 G L10030 026170 PNT = 001000 G TSTNUM 002324 G 
HOE = G LSERRT 003766 G L10031 026366 PREGRT 004020 G TXADIA 002254 G 
HWPTQ1 036744 LSETP 002102 G L10032 026560 PREGOS 003776 TXAD2A 002256 G 
HWPTQ2 036762 LSEXP1 G L10033 026776 I = 002000 G TXBFCA 002260 G 
HWPTQ3 037015 LSEXP4 002064 G L10034 027204 PRIOO = 000000 G TXBFCO= 000016 G 
MWPTQ4 037043 LSEXPS G L10035 027412 PRIO] = 000040 G TXDSBL 022604 G 
IBE = 010000 G L$HARD 036700 G L10036 027606 PRIO2 = 000100 G TXENBL 022700 G 
IDU = 000040 G L$HIME 002120 G L10037 030022 PRIO3 = 000140 G TXIEO 022774 G 
ER = 020000 G LSHPCP 002016 G L10040 0 PRIO4 = 000200 G TXIEL 023034 G 
IESTAT 002310 G LSHPTP 002022 G L10041 0 PRIOS = 000240 G TXINTC 002326 G 
= 000100 G LsHw 002212 G L10042 031032 PRIO6 = 000300 G TXINTF 002330 G 
IXE = 004000 G L$ICP 002104 G L10083 031432 PRIO7 = 000340 G TXINTR 024146 G 
IsAU = 000041 LSINIT 024236 G Li 031774 PUFIFO 020542 G TXVECA 002234 G 
I$AUTO= 000041 L$LADP 002026 G L10045 032242 RBUFA 002244 G TSARGC= 000003 
ISCLN = 000041 LSLAST 037454 G L10046 032432 020624 G TSCODE= 001052 
IsDU = 000041 L$LOAD 002100 G L10087 032750 REGTST 021076 G |  TSERRN= 022125 
ISHRD = 000041 L$LUN 002074 G L10050 033212 REPSMR 021330 G TSEXCP« 
ISINIT= 000041 LSMREV G L10051 033326 RESETT 021356 G TSFLAG= 000050 
I8MOD = 000041 L$NAME 002000 G L10052 03 RMATBB G T$GMAN= 
I8MSG = 000041 L$PRIO 2G L10053 034220 ROLOAP 021470 G TSHILI= 177777 
I$PROT= 000040 L$PROT 024230 G L10054 035356 RSTRPT 021514 G TSLAST= 000001 
ISPTAB= 000041 L$PRT 002112 G L10055 036320 RXBRRT 023756 G TSLOLI= 000000 
I$PWR = 000041 LSREPP 00 G L10056 036614 RXIEO 022212 G TSLSYM= 010000 
ISRPT = 000041 L$REV 002010 G L10057 036674 RXIEL G TSLTNO= 000032 
I8SEG = 000041 LSRPT 024222 G L10060 036744 RXINPT 024036 G TSNEST® 177777 
I8SETU= 000041 L$SOFT 037072 G L10061 037130 RXINTC 002314 G TSNSO = 000000 
IsSFT = 000041 L$SPC G NS* 177777 G RXINTF 002316 G TSNS1 = 000005 
ISSRV = 000041 LsSPCP 00 G MFUNIT 005433 G RXTMA 002244 G TSPTNU= 000000 
I8SUB = 000041 LS$SPTP 002024 G 002364 G RXVECA 002232 G TSSAVL= 177777 
IsTST = 000041 LSSTA G MMPRES 002362 G ROSLOT= 000002 G TSSEGL* 177777 
J$JMP = 000167 L$SW 002224 G MMSRO 002360 G RISLOT= 000004 G TSSUBN= . 
LNCTRA 002252 G L$TEST 002114 G MSG1 0 G R2SLOT= 000006 G TSTAGL® 177777 “ 
L = 040000 G L$TIML 002014 G MSG2 015704 G R3SLOT= 000010 G TSTAGN= 010062 
LOT = 000010 G LSUNIT 002012 G MSG3 015763 G R4SLOT= 000012 G TSTEMP = 
LPCSLT= 000036 G L10000 002222 MSLCNT 002356 G R5SLOT= 000014 G TSTEST= 000032 
LPRA 002246 G L10001 002230 MSLGET 020164 G SAVBMP 022276 G TSTSTM= 177777 
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TSTSTS= T$$ = 010061 117 032244 G T3 025726 G WA 023214 
T$ RY « Ol tseeu - $1898} Ti8 032434 G T4 026172 G WatBrES 053550 c 
TSS$AUT= 010022 TSSTES= 010057 T19 032752 G TS 026370 G WOPDR 023344 G 
TSS$CLE* 010023 T1 025214 G T2 025476 G T6 026562 G WORD1L 002332 G 
T$$OU «= 010024 T10 027610 G T20 033214 G 17 027000 G WTWLNC 023552 G 
TSSHAR= O1 Til 030024 G T21 033330 G T8 027206 G WTWLPR 023602 G 
T$$hw « O Ti2 030252 G T22 033646 G T9 027414 G X$ALWA= Q00000 
TSSINI*« 010021 ™13 030546 T23 034222 G UAM = 000200 G XSFALS= 000040 
TSSMSG* 010016 714 031034 G 724 035360 G UNBTTB 002370 G XSOFFS= 000400 
TS$$PRO* 010020 715 031434 G T25 036322 G UNITN 002236 G X$TRUE= 000020 
TSSRPT= 010017 T16 031776 G T26 036616 G UNSDIV 023060 G SPATCH 037400 G 


- ABS. 037454 000 
000000 091 
ERRORS DETECTED: 0O 


VIRTUAL MEMORY USED: 28661 WORDS ( 112 PAGES) 
OYNAMIC MEMORY: Pe oe WORDS ( 77 PAGES) 
ELAPSED TIME: 00:05:14 

CZ0MUBO ..BIN,CZDHUBO.LST/-SP=SVC34R/ML,CZDHUBO.P11 


